修改Windows的系统图标后,如何通过编程实现立即进行更新?(100分)

  • 主题发起人 主题发起人 PENGS
  • 开始时间 开始时间
P

PENGS

Unregistered / Unconfirmed
GUEST, unregistred user!
通过软件实现这个功能。
比如说。

我修改了“我的电脑”图标(在自已的软件中)。
现在想让这种修改立即实现。
调用 SystemParametersInfo
不知道参数。 试了好几个也看了E文帮助。还是没实现。不得其果?烦啦
有好心的帮助一下。OK?

多谢!
 
刷新桌面不行吗?
 
不是这么简单的问题,
请您看明后再言。
 
呵呵!图标缓存刷新一下不就行了!
 
具体如何实现?
 
是不是用SHChangeNotify(SHCNE_ASSOCCHANGED, SHCNF_IDLIST, NULL, NULL);
 
没有人帮我回答吗?
请帮忙
 
呵呵!来了!

刷新图标区

; Reg := TRegistry.Create;
; try
; ; Reg.RootKey := HKEY_LOCAL_MACHINE;
; ; if Reg.OpenKey('/Software/Microsoft/Windows/CurrentVersion/explorer/Shell Icons',True) then
; ; ; Reg.WriteString('3','C:/WINDOWS/SYSTEM/shell32.dll,15');
; ; Reg.RootKey := HKEY_CURRENT_USER;
; ; if Reg.OpenKey('/Control Panel/Desktop/WindowMetrics', True)
; ; then Reg.WriteString('Shell Icon Size','31');
; ; SendMessage(HWND_BROADCAST,WM_SETTINGCHANGE,0,0);
; ; Reg.WriteString('Shell Icon Size','32');
; ; SendMessage(HWND_BROADCAST,WM_SETTINGCHANGE,0,0);
; finally
; ; Reg.CloseKey;
; ; Reg.Free;
; end;
 
thanks PanYing and YB_unique
先给你俩每人 50 分,如能完全解决啦再加分
但是我想连 开菜单中的图标 和 Windows 资源浏览器中的更改也可以实现即时刷新啦,
能帮忙解决吗?
 
试试!
; SendMessage(FindWindow('Progman','Program Manager'),WM_COMMAND,$A065,0);
 
SendMessage 没有反应
 
多人接受答案了。
 

Similar threads

S
回复
0
查看
3K
SUNSTONE的Delphi笔记
S
S
回复
0
查看
2K
SUNSTONE的Delphi笔记
S
D
回复
0
查看
2K
DelphiTeacher的专栏
D
后退
顶部