执行 Application.Terminate 后, OnDestroy 中的代码还会执行    

执行 Application.Terminate 后, OnDestroy 中的代码还会执行, 但不会理会 OnCloseQuery、OnClose 中的代码了.

---

procedure TForm1.Button1Click(Sender: TObject);
begin
//  SendMessage(Application.Handle, WM_CLOSE, 0, 0);
//  SendMessage(Handle, WM_CLOSE, 0, 0);
//  Halt(0);
//  PostQuitMessage(0);
  Application.Terminate;
end;

procedure TForm1.FormDestroy(Sender: TObject);
begin
  Beep;
end;

---