delphi - 如何在 Panel 内制作透明表单？

Question

我需要在运行时在面板内创建一个部分透明的表单。

我怎么能做到这一点？

Answer 1

如果您的问题仅与将表单放入 TPanel 的方式有关，那么这很容易。您只需要使用新创建的表单的句柄调用Windows.SetParent() 。

MyNewForm := TMyNewForm.Create(Self); 
Windows.SetParent(MyNewForm.Handle,MyPanel.Handle);

这也可以通过使用 TForm Property ParentWindow来工作。但是（很）有可能没有处理透明度（我用半透明的形式简单地测试了它并且没有正确绘制，所以如果透明度是强制性的，它可能无法达到你的目标......）