小编Ali*_*van的帖子

我通过单击系统关闭按钮使用下面的代码关闭MDI子窗体,它工作正常:

procedure Tfrm_main.FormClose(Sender: TObject;
  var Action: TCloseAction);
begin
  Action := caFree;
end;

但是,如果我想通过使用标准按钮(在子表单本身内)关闭MDI子表单.如果我Close在事件处理程序中调用,那么我会收到访问冲突异常.

有没有办法通过使用放置在子表单本身内的标准按钮(不是系统关闭按钮)来关闭MDI子表单,而不会引发访问冲突异常？

我已经完成了类似的问题搜索,并尝试了各种代码,但仍然有例外.