Delphi - 在另一个表单后面创建表单

Question

我正在使用Delphi 4。我有一个带有动态创建新表单的按钮的主表单。我希望新表单可见，但显示在主表单后面。

我尝试在 FormCreate() 之后立即调用 SendToBack()。但这会使窗口在实际发送到后台之前快速闪烁。

我尝试使表单不可见，然后是 SendToBack()，然后是 Visible := true。但新的形式仍然处于领先地位。

看起来 SendToBack() 只适用于可见表单？如何使表单显示在主表单后面？

Answer 1

这对我有用:

SetWindowPos(newform.Handle, HWND_BOTTOM, 0, 0, 0, 0, SWP_SHOWWINDOW
  or SWP_NOMOVE or SWP_NOOWNERZORDER or SWP_NOSIZE or SWP_NOACTIVATE);

newform.Visible := true;

感谢您的帮助!