本文整理自网络,侵删。
//隐藏桌面图标
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 之 tstringbuilder 类[7]: tostring
Delphi 颜色转换函数: 从 Delphi 到 html
Delphi xe [dcc32 fatal error] f2039 could not create output file 问题的解决
更多相关阅读请进入《Delphi》频道 >>