如何使你的窗口Stay on Top

在Delphi中让窗体"StayOnTop"最简单的办法是设置Form的"FormStyle"属性为”fsStayOnTop”，但采用这种方法，如果再设置"FormStyle"属性为其他模式时，会出现窗口跳动闪烁。为了避免这个问题，这里可以利用API的威力来实现同样的功能。

4.1、设置窗体为"StayOnTop"风格.

SetWindowPos(Form1.handle

HWND_TOPMOST

Form1.Left

Form1.Top

Form1.Width

Form1.Height

0);

这里的Form1为你的窗体的名字

4.2、设置窗体为正常的、非Topmost风格

SetWindowPos(Form1.handle

HWND_NOTOPMOST

Form1.Left

Form1.Top

Form1.Width

Form1.Height

0);