程序实现桌面换桌布的问题(100分)

  • 主题发起人 主题发起人 jxyghm
  • 开始时间 开始时间
J

jxyghm

Unregistered / Unconfirmed
GUEST, unregistred user!
stry := bmp文件名
Systemparametersinfo(SPI_SETDESKWALLPAPER, 2,pchar(stry), SPIF_UPDATEINIFILE);
结果在98下面桌面没有变化,桌面点右建桌面已经是这个文件了点确定才更换
winxp下就可以一执行就换了桌布。
 
怪了,我的Windwos ME下没问题呀,能够正常切换![:)]
 
no problem .

var
tyn:pchar;

begin
tyn:='f:/图片/dddd.bmp';
SystemParametersInfo(SPI_SETDESKWALLPAPER, 0, tyn, SPIF_SENDWININICHANGE)
end;
 
难道跟我的win98有关系玛
 
如果用下面语句就没事了,速度很慢
var xx : array[50] of char;
SendMessage(HWND_BROADCAST, WM_SETTINGCHANGE, SPI_SETDESKWALLPAPER, integer(@xx));
我想知道上面这句和下面这句话各自的作用
Systemparametersinfo(SPI_SETDESKWALLPAPER, 2,pchar(stry), SPIF_UPDATEINIFILE);
 
Systemparametersinfo(SPI_SETDESKWALLPAPER, 2,pchar(stry), SPIF_UPDATEINIFILE);
发送消息告诉windows更换桌布
SendMessage(HWND_BROADCAST, WM_SETTINGCHANGE, SPI_SETDESKWALLPAPER, integer(@xx));
是告诉windows刷新重绘说面上的所有窗体吧
把分给我jxy ghm 哈哈!
 
接受答案了.
 
后退
顶部