山寨机中的战斗机！	程序优化工程师到底对IT界有没有贡献

如何使自己编写的应用程序浮于其它程序的上方?

楼主idrip（碧海）2003-08-01 23:03:09 在 Delphi / Windows SDK/API 提问

如题问题点数：50、回复次数：12Top

1 楼idrip（碧海）回复于 2003-08-01 23:04:40 得分 0

就像某些软件中的stay on top 那样.Top

2 楼jackyuke（jack）回复于 2003-08-01 23:06:35 得分 0

设置窗体属性FormStyle为fsStayOnTopTop

3 楼pankun（剑神一笑 Console下面干革命）回复于 2003-08-01 23:08:04 得分 0

form直接就有个属性设置后就可以让窗口总在最前。Top

4 楼ljmanage（过客）回复于 2003-08-01 23:12:30 得分 0

设置窗体属性FormStyle为fsStayOnTop
Top

5 楼zousoft（菜菜鸟的战斗诗歌）回复于 2003-08-02 09:22:23 得分 0

恩, 霸道的想法. 想再霸道些可以在TForm.OnCloseQuery中加入代码再屏蔽Ctrl+Alt+Del, 让别人关闭不了你的程序, 也关不了机... -_-#Top

6 楼hilove（小枫）回复于 2003-08-02 09:51:09 得分 0

一、设为总在上方：
将Form1的FormStyle设为fsStayOnTop
二、禁止别的应用程序关闭自已的程序。
在你的应用中设一个BOOL值的参数。然后再在OnCLoseQuery中对比一下，如果你没有手工将此参数设为相应的值，则不允许关闭。
如：
if CanShutDown then
CanClose:=true
else
CanClose:=false;
Top

7 楼abc200210（呵呵）回复于 2003-08-02 14:28:14 得分 50

BOOL SetWindowPos(

HWND hWnd, // handle of window
HWND hWndInsertAfter, // placement-order handle
int X, // horizontal position
int Y, // vertical position
int cx, // width
int cy, // height
UINT uFlags // window-positioning flags
);Top

8 楼angelface（§<@#$&^%$>§）回复于 2003-08-02 15:18:57 得分 0

嗯，， SetWindowPos
Top

9 楼FrameSniper（http://naoku.net/blogs/framesniper/）回复于 2003-08-02 15:27:11 得分 0

可以揭贴了！Top

10 楼seawavefj（@_@）回复于 2003-08-02 15:32:25 得分 0

设置窗体属性FormStyle为fsStayOnTopTop

11 楼supermanzd（雷帝-因陀罗）回复于 2003-08-02 16:04:52 得分 0

将窗体属性FormStyle设置为fsStayOnTopTop

12 楼idrip（碧海）回复于 2003-08-02 16:43:46 得分 0

fsStayOnTop我当然是知道了,可那样就没法做为fsMDIForm了.Top