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 映像劫持编辑器

Delphi tparallel并行性能测试

Delphi winapi: getmodulehandle - 获取一个模块(exe 或 dll)的句柄

Delphi有关asqlite控件支持中文路径的解决方案

Delphi中使用临界区来让线程同步

在rad studio Delphi或c++安卓应用中使用自定义java库

Delphi读取和写入utf-8编码格式的文件

Delphi trim删除字符串首尾空格

Delphi程序支持外部参数

Delphi源码基础源码-按下回车取得焦点

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



打赏

取消

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

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

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

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

评论

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