delphi - 应用程序关闭时表单中是否会触发事件

Question

我的应用程序生成了几个独立的表单。一旦创建，应用程序就会忘记它们。所有操作均以该形式本身处理。我想，当应用程序关闭时，表单也会通过 RTS 关闭。这很好，只是 OnClose 和 OnDestroy 事件都没有被触发，因此会发生内存泄漏。我可以管理存在哪些表单(就像我现在所做的那样)，但实际上应用程序必须完全忘记这些表单。

有没有办法在表单(不是应用程序主表单)内部检测应用程序是否正在关闭？

Answer 1

如果表单被销毁，OnDestroy 事件肯定会触发。它是从表单的销毁代码中调用的。所以唯一的结论是你的表单没有被破坏，所以被泄露了。

有几种明显的方法可以确保您的独立表单不被泄露:

1. 创建时，传递 Application 或 MainForm 作为表单的所有者参数。当所有者被摧毁时，它所拥有的一切也会被摧毁，包括你的表格。
2. 在调用 Application.Run 返回后，从主表单析构函数或 .dpr 文件中显式销毁这些表单。

选项 1 是最常用的方法。