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

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

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