2

我们有一些覆盖 createwnd 的旧版 delphi 自定义组件。这些组件位于表单内的面板上。

当窗体和面板被实例化时，组件也被实例化，并且 createwnd 被调用一次。这是有道理的。

但是，如果我在运行时切换面板的父级，我惊讶地发现 createwnd 将再次被调用。

例如，在某些情况下，我可能会将 Panel1 的父容器更改为 Form2.panel2。基本上在运行时在 Form2 的面板内绘制 Panel1。 

TForm1.buttonclick(..)
begin
..
  Panel1.parent := Form2.panel2;
..
end;

当父级更改时，为什么要重新创建 Panel1 中的自定义组件？

Panel1 中的所有组件的行为是否相同，即使不是自定义的，例如，如果我在 Panel1 上也有一个 TButton，那么在切换父级时也会重新创建它吗？我不认为它会，这就是为什么我如此惊讶。

最后，如果这种行为不正确，我该如何做到这一点，以便在父容器更改时不会调用 createwnd。

谢谢！

4

1 回答 1

8

面板中的所有控件TWinControl都重新创建了它们的窗口句柄，以及面板的窗口句柄（原因是相反的）。

如果您的代码在每个程序的生命周期中只能调用一次，那么CreateWnd这不是正确的地方。请尝试使用构造函数。

此外，将面板从一种形式替换为另一种形式可能会混淆面板的所有权，并可能导致意外行为甚至错误。请参阅：如何分离面板并将其显示在单独的窗口中？

于 2013-04-18T20:39:23.317 回答