如何将一个窗体（form)设置为“总在最前”？

Question

formstyle：=fsStayOnTop
就可以更改窗体一直在最前面。一定可以的

Answer 1

另外如果是不是主窗体
可以使用
FORM2.ShowModal;

Answer 2

SetWindowPos(Self.Handle,HWND_TOP,Self.Left,Self.Top,Self.Width,Self.height,SWP_SHOWWINDOW);

Answer 3

设置为“总在最前”
SetWindowPos(Self.Handle, HWND_TOPMOST, Self.Left, Self.Top, Self.Width, Self.Height, SWP_NOACTIVATE or SWP_SHOWWINDOW)
取消
SetWindowPos(Self.Handle, HWND_NOTOPMOST, Self.Left, Self.Top, Self.Width, Self.Height, SWP_NOACTIVATE or SWP_SHOWWINDOW);

Answer 4

非常简单的一句话：
SetWindowPos(Form2.Handle,HWND_TOPMOST,0,0,0,0,SWP_NOMOVE+SWP_NOSIZE+SWP_SHOWWINDOW);
—————————————————————————————————
MaximStr := '宠辱不惊，看庭前花开花落，去留无意；
             毁誉由人，望天上云卷云舒，聚散任风。';
if Not Assigned(I) then
  I := TI.Create(Nil);
I.Maxim := MaximStr;
I.Explain := '假如上述代码中出现“OA”等字样，删除它们';
I.Desire := '加不加分随你';
—————————————————————————————————
　　　　　　　

Answer 5

设置窗体属性formstyle：=fsStayOnTop

Answer 6

SetWindowPos(Form2.Handle,HWND_TOPMOST,0,0,0,0,SWP_NOMOVE+SWP_NOSIZE+SWP_SHOWWINDOW);

Answer 7

各位的方法我都已经试过了，就是因为那样做不行？（其实是有些问题，算是bug吗？）就是：使用SetWindowPos函数后，窗体确是总在最前，但我不能单击窗体的标题栏移动窗体，否则的话，窗体自动又不在最前了（动态改变formstyle的值是同样的结果）
帮忙给个解释吧
我的操作系统是Win ME