win2000里面怎样更换墙纸？好像和98的不一样。。。

Question

  SystemParametersInfo(SPI_SETDESKWALLPAPER, 0, PChar('d:\winnt\ACD Wallpaper.bmp'),0);

Answer 1

我说的是那个函数：
systemparaminfo
不是注册表

Answer 2

to：cszhz(丑小鸭)　
你说的不行呀，
procedure TForm2.Button5Click(Sender: TObject);
begin
SystemParametersInfo(SPI_SETDESKWALLPAPER, 0, PChar(edit1.Text),0);
end;
edit1选择的肯定是bmp没错，但是只看到桌面刷新了一下，壁纸没变。

Answer 3

AnsiString name;
 OpenPicDlg->FileName="";
 OpenPicDlg->Execute();
 name=OpenPicDlg->FileName;
 if(name!=""){
  TRegistry *reg=new TRegistry;
  reg->RootKey=HKEY_CURRENT_USER;
  if(reg->OpenKey("Control Panel\\desktop",false)==false){
   MessageBox(Handle,"更改墙纸时出现错误,更改失败。","Windows进程控制",MB_ICONINFORMATION);
   return;
  }
  reg->WriteString("Wallpaper",name);
  reg->CloseKey();
  delete reg;
  SystemParametersInfo(SPI_SETDESKWALLPAPER,0,NULL,SPIF_UPDATEINIFILE|SPIF_SENDCHANGE);
  SHChangeNotify(SHCNE_ASSOCCHANGED,SHCNF_IDLIST|SHCNF_FLUSH,NULL,NULL);
 }
环境：C++Builder 5+Win2kprof

Answer 4

请问这个：SHChangeNotify
在delphi的什么单元里面？
[Error] common_san.pas(286): Undeclared identifier: 'SHChangeNotify'
[Error] common_san.pas(286): Undeclared identifier: 'SHCNE_ASSOCCHANGED'
[Error] common_san.pas(286): Undeclared identifier: 'SHCNF_IDLIST'

Answer 5

并不是更换不了，而是系统没有得到通知，你重新login看看就知道了。
我想是SHChangeNotify的刷新类型不对。试试其他的系统notify手段。我这里没有死窗口现象，而且更换迅速。

Answer 6

那么请问怎样定义SHChangeNotify的刷新类型呢？

Answer 7

well,lookhttp://codeguru.earthweb.com/cgi-bin/bbs/wt/showpost.pl?Board=vc&Number=300346&page=19&view=collapsed&sb=5

Answer 8

Visual C++ Programming 
 
Subject Re: >>Desktop Wallpaper  
Category AdvancedUI  
Posted by Weiye on 10/7/01 at 09:59 pm   
Rating not rated 
Then, try the IActiveDesktop interface functions, like SetWallpaper(...). Do a search on this board on IActiveDesktop. There are alot of similiar posts and code samples.Chen Weiye
------------------------------------------------------------------------------
When pursuing your dream, don't forget to enjoy your life...
------------------------------------------------------------------------------ 

Answer 9

好像是与ActiveDesktop的启动否有关！

Answer 10

我记得ACDSee无论在2000或者98下，无论ActiveDesktop是否启动，都能顺利的更换墙纸呀，我们不能么？

Answer 11

记得ACDSee无论在2000或者98下，无论ActiveDesktop是否启动，都能顺利的更换墙纸我觉得应该是ACDSee偷偷启动了ActiveDesktop而没有提示。如果不用ActiveDesktop的话，许多墙纸都不能用的。有个IActiveDesktop接口可以看看。

Answer 12

用    SystemParametersInfo(SPI_SETDESKWALLPAPER, 0, PChar('d:\winnt\ACD Wallpaper.bmp'),0); 
 应该可以的呀，我的OS是WIN2K PROFESSIONAL，不更改成功了的