为什么SendToBack不能使用Delphi XE4

Question

我正在使用Delphi XE4并尝试创建第二个表单并将其设置为背景，而第一个表单是透明的（AlphaBlend = true; AlphaBlendValue = 220）

    uses Unit2;

    procedure TForm1.Button1Click(Sender: TObject);
    begin
      Form2.Show;
      Form2.SendToBack;
    end;

上面的代码正在使用Delphi 7，但不适用于Delphi XE4（Form2仍在Form1上）。任何人都可以告诉我为什么代码不能与XE4一起使用？以及如何使其发挥作用？

提前致谢。

Answer 1

检查Form2的PopupMode属性的设置。它可能以某种方式设置，导致Form1的窗口成为Form2窗口的父窗口，这将阻止Form2在Form1后面移动。 D7中不存在PopupMode（和PopupParent）属性，它是在更高版本中引入的，用于解决VCL在早期版本中遭受的z次序错误。

阅读以下blob文章了解更多详情：

PopupMode and PopupParent