windows - Delphi XE2 将 Application.MainForm.Handle 分配给 DLL 中的 Application.Handle

Question

我对从 DLL 内部创建的表单有一个小问题。

基本上，当显示来自 dll 的表单 (Form1)(我认为它必须保持在顶部)并且您打开另一个与主应用程序分开的表单(Form2)(即不在内部)时，会发生什么dll)。如果将光标放在 Form2 上的控件上以显示提示，则 Form2 将立即移到 Form1 后面。

只有当 MainFormOnTaskBar 为 true 时才会发生这种情况。目前我们正在将主应用程序的 Application.Handle 传递给 DLL，并将其分配给 DLL 的 Application.Handle。

我已设法通过将 Application.MainForm.Handle 传递给 DLL 以分配给 DLL 中的 Application.Handle 来解决问题。

这样安全吗？有谁知道解决这个问题的正确方法吗？

Answer 1

您的解决方案非常合理。我有一个 Excel COM 加载项，它的功能非常相似。在该代码中，我将 DLL 中的 Application.Handle 设置为 Excel 主窗口的窗口句柄。这与您正在做的事情很相似。

问题是您需要正确设置窗口所有权。您需要所有权链一直回到应用程序的主窗体。 DLL 中的窗体不知道主窗体是什么，因此您必须提供该知识。

请注意，我说的是 Windows 使用的窗口所有者的概念，而不是 VCL 的所有者概念，后者是完全不同的。在 VCL 术语中，这称为弹出式父级，您可以通过将 DLL 窗体的弹出式父级显式设置为主窗体来解决您的问题。相关属性是 PopupMode 和 PopupParent。对于存在于主应用程序中的窗体，VCL 自然会使其弹出父窗体成为主窗体。

但是，在讨论了显式设置弹出父项之后，我要强调的是您当前的解决方案更简单、更方便。

这两种解决方案所做的都是确保所有辅助表单都归主表单所有。这意味着这些窗体总是在主窗体之上。这意味着如果主窗体被最小化，那么辅助窗体也会被最小化。在此处阅读有关自有 window 的信息:Window Features .

顺便说一下，如果您使用的是运行时包而不是 DLL，则包中的代码将连接到与主窗体相同的 VCL。因此打包代码将能够看到主窗体并适本地设置窗口所有者。这当然是使用包的一个优势。当然，您需要使用 DLL 而不是包可能有充分的理由。