ShowModalの結果から元フォームを閉じたい

解決

ojinojin  2006-02-20 16:15:32  No: 20117  IP: 192.*.*.*

Delphi初心者です。メインフォームからFormCreateのイベントでモード付のパスワード入力フォームを呼び出します。モード付フォームの「キャンセル」の時はメインフォームを閉じたい（プログラムも終了したい）のですが、Closeでは終了しないのですが、どなたかご存知の方、ご教示お願いします。

procedure TMain_form.FormCreate(Sender: TObject);
begin
  Flg_Open :=0;  // 0で初期化する
  Fin_pass :=TFin_pass.Create(self);
  try
    Fin_pass.ShowModal;
  finally
    Fin_pass.Free;
  end;
  if Flg_Open =0 then   // 0のときは閉じる
  begin
    Close;     // これではこのフォームは閉じないので困っています。
  end
end;

編集 削除
ふぁいと〜いっぱ〜つ！  2006-02-20 16:22:10  No: 20118  IP: 192.*.*.*

Application.Terminate;
ならドジル。←閉じるやろ。

編集 削除
ojinojin  2006-02-20 16:27:19  No: 20119  IP: 192.*.*.*

閉じました。本当にありがとうございました。早いレスでおどろきました。今後ともよろしくお願いします。

編集 削除