syhsieh 发表于 2013-8-15 17:06:37

取得桌面壁紙路徑

本帖最后由 syhsieh 于 2013-8-15 17:08 编辑

拜讀了那麼多的文章
好像沒有人PO關於如何取得桌面壁紙路徑的文章
其實很簡單
我把設定壁紙的程式拿來應用一下就出來了
Func z_GetWallpaperFilename()
        Return RegRead("HKEY_CURRENT_USER\Control Panel\Desktop", "Wallpaper")
EndFunc
$OldWallpaperFilename = z_GetWallpaperFilename()

_ImageFileChange(@ScriptDir & "\_pic\P1.jpg", @TempDir & "\GDIPlus_Image.bmp", "BMP")
_ChangeDesktopWallpaper(@TempDir & "\GDIPlus_Image.bmp", 2)

$NewWallpaperFilename = z_GetWallpaperFilename()
MsgBox(0,"","Old Wallpaper Filename = "&$OldWallpaperFilename &@CRLF&"New Wallpaper Filename = "&$NewWallpaperFilename)

漫反射 发表于 2013-8-15 19:55:58

那只能说明你拜读的文章还不多{:face (411):}

eeee0704 发表于 2015-10-10 14:44:49

不错~`··`·

eeee0704 发表于 2015-10-10 14:44:51

不错~`··`·
页: [1]
查看完整版本: 取得桌面壁紙路徑