お知らせ

電子会議

ライブラリ

FDelphi サイト全文検索

Delphi FAQ一覧

サンプル蔵



FDelphi FAQ
15番会議室「FAQ編纂委員会」に寄せられた「よくある質問の答え」

[Q]
アプリケーションを終了する方法を教えてください  (1)MainForm の FormCreate メソッドで条件によっては終了したい場合  (2)MainForm 以外(子フォーム)から終了させたい場合

[A]
(1)Application.Terminateを使えば終了できます。
 または、プロジェクトファイル(.DPR)を"例"のようにする方法もあります。
(2)Application.MainForm.Closeを使えば終了できます。
 (MainFormのプロシジャーなら、単にCloseとします)
[例]
ファイルを探して見つからなかったときに終了させる方法の例です。
以下のようにプロジェクトファイル(DPRが拡張子のもの)を書きます。
コマンドライン引数に指定したファイルが見つからなければすぐに終了します。
program Project1;
  Forms,
  Unit1 in 'UNIT1.PAS' {Form1};
{$R *.RES}
begin
  if FileExists(ParamStr(1)) then
     begin
      Application.CreateForm(TForm1, Form1);
      Application.Run;
    end;
end.


ここにあるドキュメントは NIFTY SERVEの Delphi Users' Forum FDELPHIに寄せられる質問の中から、よくある質問への回答を FDELPHIのメンバーがまとめたものです。 したがって、これらの回答はボーランド株式会社がサポートする公式のものではなく、掲示されている内容についての問い合わせは受けられない場合があります。

Copyright 1996-1998 Delphi Users' ForumFAQ編纂委員会