delphi 让"显示桌面"功能对你的窗口无效


本文整理自网络,侵删。

  TForm1 = class(TForm)
protected
procedure CreateParams(var Params: TCreateParams); override;
end;

procedure TForm1.CreateParams(var Params: TCreateParams);
begin
inherited;
Params.WndParent := FindWindow('Progman',nil);//就是桌面
end;



相关阅读 >>

Delphi setprivilege 提权代码

Delphi mainmenu控件 checkde属性用法

Delphi 选择文件夹对话框 (有新建文件夹按钮)修正版

Delphi 长文件路径转换短文件路径

Delphi代码中嵌入asm代码

Delphi 加载大文件显示进度条

Delphi 2009 之 tstringbuilder 类[5]: chars[] 属性与 copyto 方法

Delphi使用json解析调用淘宝ip地址库rest api 示例

Delphi 去字符串长度函数 strlen,length

Delphi 之 工具栏组件(ttoolbar)

更多相关阅读请进入《Delphi》频道 >>



打赏

取消

感谢您的支持,我会继续努力的!

扫码支持
扫码打赏,您说多少就多少

打开支付宝扫一扫,即可进行扫码打赏哦

分享从这里开始,精彩与您同在

评论

管理员已关闭评论功能...