Delphi——FormColse

2021年3月6日 19点热度 0条评论 来源: Christine666666

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 会随父窗体释放而自动释放。

    原文作者:Christine666666
    原文地址: https://blog.csdn.net/m0_52389829/article/details/114267967
    本文转自网络文章,转载此文章仅为分享知识,如有侵权,请联系管理员进行删除。