桌面刷新(api)的参数设置，多谢看里面

[DarkLeopard0317]

(2001-07-27 23:51:35) ★零点冰冷★
SystemParametersInfo SPI_SETDESKWALLPAPER, 0, "f:\desk\bmp\2.bmp", SPIF_UPDATEINIFILE
面每次我刷新桌面才会生效，
所以在后面要加一句刷新桌非
ss=getdesktopwindows
sendmessage ss,??,-1.??,
？？ 不知道
(通过服务器中转)

[DarkLeopard0317]

Gz

[MonkeyLin]

用SHChangeNotify

[MonkeyLin]

Private Declare Sub SHChangeNotify Lib "shell32" _
(ByVal wEventId As Long, _
ByVal uFlags As Long, _
ByVal dwItem1 As Long, _
ByVal dwItem2 As Long)

Const SHCNE_UPDATEIMAGE = &H8000&
Const SHCNF_FLUSHNOWAIT = &H2000
Const SHCNF_DWORD = &H3

Private Sub Command1_Click()
Dim l As Long

l = -1
SHChangeNotify SHCNE_UPDATEIMAGE, SHCNF_DWORD, l, 0
End Sub

[ddeng]

把SPIF_UPDATEINIFILE改成SPIF_SENDCHANGE

[DarkLeopard0317]

SystemParametersInfo SPI_SETDESKWALLPAPER, 0, "f:\desk\bmp\3.bmp", SPIF_SENDCHANGE
改了以后，桌面都必变不了呀
2.我想知道刷新桌面的方法，
多谢大侠指教