如何让form在模态窗体上还StayOnTop

[jiafcat]

如何让form在模态窗体上还StayOnTop?

我有一个主窗体产生一个Form1，Form1又产生一个Form2（非模态）。Form2的FormStyle=fsStayOnTop。当用Form1->Show()，显示Form1时，Form2可以一直在最上边。
但当用Form1->ShowModal()，显示Form1时，Form2在失去输入焦点后，就被Form1挡住了，不能StayOnTop了。而我又确实希望Form1是模态的。所以，请教大家如何让Form2（非模态）一直在Form1之上？

[我不懂电脑]

用
BOOL SetForegroundWindow(

HWND hWnd // handle of window to bring to foreground
);

[sundayboys]

SetWindowPos(Handle,
HWND_TOPMOST,
Left,
Top,
Width,
Height,
SWP_NOACTIVATE or SWP_NOMOVE or SWP_NOSIZE);

[「已注销」]

同意孤独兄

to sundayboys

有时候并不能用这个函数来实现

@_@

[jiafcat]

songhtao的SetForegroundWindow应该是相当于TForm的BringToFront()方法，必须在Form2每一次被遮住后执行，实际上是不好用的。
我在delphi区也发贴了，zjqyb提出了重载TForm的Createparams的方法，我觉得比较好。有兴趣的可以去看一看。
sundayboys的方法，没有试过，可能也是可以的。
实在是很高兴，怎么快就有回应了，CSDN的人气比以前要旺多了。