アプリケーションを終了する

アプリケーションを終了させるにはメインフォームを Close するのが一般的です。ただし、メインフォーム以外ではアプリケーションを終了させたくても Close ではそのフォームが閉じるだけです。メインフォーム以外でアプリケーションを終了させるには Applicationオブジェクトの Terminate メソッドを使用します。

■ アプリケーションを終了させる例

procedure TForm2.btnCloseClick(Sender: TObject); begin { 確認ダイアログを表示 } if MessageDlg('終了しますか？',mtInformation,[mbYes,mbNo],0) = mrYes then begin { アプリケーションを終了させます } Application.Terminate; end; end;