delphi – 在aControl中调用aControl.free

发布时间：2020-12-15 09:24:21 所属栏目：大数据来源：网络整理

导读：阅读 this之后我想知道下一个代码有什么问题： procedure TForm1.Button5Click(Sender: TObject);begin Button5.free;end; 解决方法在该例程上放置一个断点并检查调用堆栈.一旦从事件处理程序返回,仍然会运行Button5的代码,以及其他需要Button5仍然存在的VC

阅读 this之后我想知道下一个代码有什么问题：

procedure TForm1.Button5Click(Sender: TObject);
begin
  Button5.free;
end;

解决方法

在该例程上放置一个断点并检查调用堆栈.一旦从事件处理程序返回,仍然会运行Button5的代码,以及其他需要Button5仍然存在的VCL代码.如果你从它下面删除对象,你很可能会以某种方式破坏内存或引发异常.

如果你想这样做,正确的方法是调用PostMessage并在表单上发布一条消息,最终在当前代码运行完毕后安全地释放对象.

（编辑：李大同）

【声明】本站内容均来自网络，其相关言论仅代表作者个人观点，不代表本站立场。若无意侵犯到您的权利，请及时与联系站长删除相关内容!