本文整理自网络,侵删。
//隐藏桌面图标
var
hDesktop : THandle;
begin
hDesktop := FindWindow(′Progman′, nil);
ShowWindow(hDesktop, SW_HIDE);
end;
//显示桌面图标
var
hDesktop : THandle;
begin
hDesktop := FindWindow(′Progman′, nil);
ShowWindow(hDesktop, SW_show);
end;
相关阅读 >>
Delphi 2009 泛型容器单元(generics.collections)[1]: tlist<t>
Delphi d10.x 安卓app开发中按返回键后程序不退出程序的方法
Delphi rest 服务器返回utf16编码转换成正常string
更多相关阅读请进入《Delphi》频道 >>