解析Delphi 窗口置顶,及非主窗口置顶
来源:互联网 发布:淘宝拍摄方案 编辑:程序博客网 时间:2024/05/30 05:30
窗口置顶
setwindowpos(self.handle,HWND_TOPMIOST,0,0,0,0,SWP_NOMOVE or SWP_NOSIZE);//窗口置顶
setwindowpos(self.handle,HWND_NOTOPMIOST,0,0,0,0,SWP_NOMOVE or SWP_NOSIZE);//取消窗口置顶
非主窗口置顶
在Delphi中,非主窗体如何置顶
SetWindowPos(Form1.Handle, HWND_TOPMIOST, Left, Top, Width, height, SWP_SHOWWINDOW)可以将窗口放在所有窗口的最前面,但是这仅对一个应用程序的主窗口有效,非主窗口只能在这个应用程序的内部被置前,但是其他应用程序的窗口仍然会盖住他。
解决方法是将Form1的父窗口设为桌面,如:
procedure TForm1.CreateParams(var Params: TCreateParams);
begin
inherited;
with Params do
begin
WndParent := GetdesktopWindow();
end;
end;
但是这样会在进程管理器中的应用程序中多出一个Form1,怎样才能不让出现这个Form1了,其实解决方法很简单的,只需要将Form1的caption属性设为空就可以:Form1.Caption := '';
//下面这一种我使用过了,比较喜欢这种 ,很方便
还有另外一种可以不用将Form1的父窗口设为桌面也可以置前,那就是在窗体创建置前调用
Application.NormalizeTopMosts;
然后再调用SetWindowPos也可以实现将窗口置前的效果
- 解析Delphi 窗口置顶,及非主窗口置顶
- Delphi 窗口置顶的方法
- Delphi 窗口置顶的方法
- 窗口桌面置顶(Delphi)
- 窗口置顶/取消置顶
- 窗口置顶
- 窗口置顶
- 窗口置顶
- 窗口置顶
- 窗口置顶
- 窗口置顶/取消置顶工具
- VB让窗口置顶
- 窗口置顶问题
- 窗口置顶小工具
- swing 窗口置顶
- VB 无标题窗口置顶
- vb窗口置顶函数
- SetWindowPos窗口置顶
- HDU1711(KMP)
- Codeforces #345 Div2 C Watchmen 容斥
- Android在线中文API
- 微信自定义菜单
- 反转单链表
- 解析Delphi 窗口置顶,及非主窗口置顶
- [ML of Andrew Ng]Week 2 : Linear Regression with Multiple Variables and Normal Equation
- [转载]微服务实践(五):微服务的事件驱动数据管理
- Caused by: java.lang.ClassNotFoundException: org.aspectj.util.PartialOrder$PartialComparable
- 浏览器访问服务器端资源的详细步骤
- uitesting 问题汇总
- 五大常用算法之五--分支限界法
- Swoole Framework logo PHP高级Web开发框架 Swoole Framework
- ubuntu samba 配置