如何让一个窗体显示在其他任何程序的最前面?就象qq窗体一样。
谢谢!
谢谢!
解决方案 »
- excelapplication有什么好的方法可以获取当前表格当前工作簿有多少行记录??
- 发现一个国外兼职项目的汇总网站,推荐给大家
- 安装过fast report朋友帮忙看看吧:)
- 关于快捷键的奇怪问题, 似乎是D 的BUG
- 用postmessage对某程序发消息,保存对话框的内容怎么办?
- 如何清除TextOut输出的字符
- 各位大虾,有谁知道那有SeSkin控件的下载地址呀?急急急!
- richedit中,文字滚屏。(要求:平滑滚屏。类似word的滚屏)。
- ClientDataSet控件问题,着急。
- 一个初学者的问题
- 请问如何知道DirectoryListBox这个控件当前打开的那个目录是Items.Strings[几]?
- 小弟,跪求高首相助,!!
行舟
欢迎使用CSDN论坛浏览器
http://blog.xingzhou.com
http://blog.csdn.net/xingzhou/
就可以了。
Public
procedure Createparams(Var Params:TCreateParams);override;
...procedure TFormDrop.Createparams(var Params:TCreateParams);
begin
Inherited CreateParams(Params);
With Params do
begin
EXStyle:=ExStyle or WS_EX_TOPMOST;
wndParnet:=GetDesktopWindow; //关键一行,用SetParent都不行!!
end;
end;
或//Params.Style := WS_SIZEBOX or WS_POPUP or WS_BORDER;
都可以让程序放于最上面 但在两个程序来回切换操作若干次后就会被屏蔽到别的程序下面去了。请konhon(优华) 指教 谢谢
EXStyle:=ExStyle or WS_EX_TOPMOST;不用写就可以