delphi 关闭(close或点叉)操作并不难销毁进程,
所以建议在delphi编程中为每个主form(登录,界面)加close事件
1
2
3
4
|
procedure
TForm1
.
FormClose(Sender: TObject;
var
Action: TCloseAction);
begin
Application
.
Terminate;
end
;
|
本文转自lilin9105 51CTO博客,原文链接:http://blog.51cto.com/7071976/1220061,如需转载请自行联系原作者