请问各位高手：如何用VB实现不重新启动而刷新注册表？谢谢！！！！！！！！！！！

Question

回复人：Kingron(ＷｉｎＡＰＩ)    (2001-3-3 13:25:00)  得20分 
呵呵，20'太少了，你知道我是弄了多久才搞明白吗？写出来让大家共享：
SHChangeNotify(SHCNE_ASSOCCHANGED,SHCNF_IDLIST+SHCNF_FLUSH,nil,nil);//刷新文件关联图标
其中SHChangeNotify还有多个地方可以刷新，具体的看帮助！
SHChangeNotify(SHCNE_ALLEVENTS , SHCNF_FLUSH,nil,nil);//发生所有的事件，系统应该刷新响应的项目
function SHUpdateRecycleBinIcon():boolean;stdcall;external 'shell32.dll' name 'SHUpdateRecycleBinIcon';//刷新回收站图标
SendMessage(HWND_BROADCAST, WM_SETTINGCHANGE, 0, 0);//通知系统设置改变
var
buf:pchar;
...
getmem(buf,SizeOfBuf);//
strpcopy(buf,'注册表的主键，例如Software\Microsoft\windows\currentversion\Explorer\ToolBar');
SendMessage(HWND_BROADCAST,WM_SETTINGCHANGE,0,buf);
//通知系统刷新响应的键值，如果前面的没有起作用，那么可以采用这个方法。
systemparametersinfo(SPI_SETDESKWALLPAPER,0,pchar(path),0);
//上面的是通知系统更改了墙纸，其中path为墙纸的路径。
同样，SystemParametersInfo()还可以对系统进行很多方面的刷新，例如更改了桌面的大小等等，你可以看看帮助，我不可能在这儿把所有的都写出来。就说这么多吧，希望你能举一反三

Answer 1

上次我不是说了这个了吗？
SendMessage(HWND_BROADCAST, WM_SETTINGCHANGE, 0, 0)