F
fonawu
Unregistered / Unconfirmed
GUEST, unregistred user!
既然 TForm1.FormCreate 在我们点击project1.exe时自动运行，而
procedure TForm1.FormDestroy(Sender: TObject);
begin
showmessage('some message ');
end;
却不会再我们关闭窗体时自动运行？难道关闭窗体的时候没有触发ondestroy事件？
非得要
procedure TForm1.FormClose(Sender: TObject;
var Action: TCloseAction);
begin
form1.Destroy;
//触发ondestroy事件
end;
才可以运行？
procedure TForm1.FormDestroy(Sender: TObject);
begin
showmessage('some message ');
end;
却不会再我们关闭窗体时自动运行？难道关闭窗体的时候没有触发ondestroy事件？
非得要
procedure TForm1.FormClose(Sender: TObject;
var Action: TCloseAction);
begin
form1.Destroy;
//触发ondestroy事件
end;
才可以运行？