我遇到一个问题,当用户打开和关闭太多表单或使用应用程序几分钟时,我的应用程序会随机冻结,所以我怀疑这些表单是否真的从内存中释放出来。
我用它来显示表格:
Form55 := TForm55.Create(Self);
Form55.Show;
某些表单有一个关闭它的按钮而其他表单没有:
procedure TForm55.Button2Click(Sender: TObject);
begin
Form55.Close;
end;
在OnClose上我非常喜欢这个:
procedure TForm55.FormClose(Sender: TObject; var Action: TCloseAction);
begin
// Actions
Application.ProcessMessages;
Action := TCloseAction.caFree;
end;
但是,如果用户只需点击手机中的“返回”按钮,它就会触发关闭事件?如果是这样,那是免费表格的正确方法吗?