1-关闭一个窗口有几种方式:
最小化这个窗口,隐藏这个窗口,释放这个窗口,
2-例如:
procedure TForm1.FormClose(Sender: TObject; var Action: TCloseAction);
begin
action:=cafree; //TCloseAction = (caNone, caHide, caFree, caMinimize);
end;
3-其中action有四种取值按顺风序分别:什么也不做,隐藏,释放,最小化
action代表当触发窗体OnClose事件时,以哪种方式去响应!
Action:=cafree;这句话就是说但这个窗口关闭的时候释放这个窗口,它应该是在form的onclose事件里面的。
4- Action:=cafree;在何时使用:
如果没有写Action := caFree; 而:
AForm:=TMyForm.create(父窗体句柄);
AForm.Show
也不需要在别的地方free。AForm 会随父窗体释放而自动释放。
Delphi——FormColse
最新推荐文章于 2022-02-19 20:52:22 发布