delphi – 如何使“显示/隐藏桌面图标”设置生效?

下面的代码调用SHGetSetSettings函数来隐藏桌面图标
但它只是从视图菜单中取消选中“显示桌面图标”.

我打电话给SHChangeNotify(SHCNE_ASSOCCHANGED,SHCNF_FLUSHNOWAIT,nil,nil);
更新桌面,但这不起作用?

var
lpss: SHELLSTATE;
begin
  lpss.Data := High(cardinal);
  lpss.Data2 := Low(cardinal);
  SHGetSetSettings(lpss,SSF_HIDEICONS,true);
  SHChangeNotify(SHCNE_ASSOCCHANGED,nil);
end;

解决方法

isa,要刷新桌面,您可以将F5键发送到progman(程序管理器)窗口
PostMessage(FindWindow('Progman',nil),WM_KEYDOWN,VK_F5,3);

隐藏桌面图标的另一种方法是

ShowWindow(FindWindow('Progman',SW_HIDE); //hide the icons desktop and refresh the screen

再次显示

ShowWindow(FindWindow('Progman',SW_SHOW); //show the icons of the desktop and refresh

相关文章

 从网上看到《Delphi API HOOK完全说明》这篇文章,基本上都...
  从网上看到《Delphi API HOOK完全说明》这篇文章,基本上...
ffmpeg 是一套强大的开源的多媒体库 一般都是用 c/c+&#x...
32位CPU所含有的寄存器有:4个数据寄存器(EAX、EBX、ECX和ED...
1 mov dst, src dst是目的操作数,src是源操作数,指令实现的...