执行 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;


免责声明!

本站转载的文章为个人学习借鉴使用,本站对版权不负任何法律责任。如果侵犯了您的隐私权益,请联系本站邮箱yoyou2525@163.com删除。



 
粤ICP备18138465号  © 2018-2025 CODEPRJ.COM