Jump to content
Sign in to follow this  

WallPaper Changer

Recommended Posts


Only if $wallpaper is a *.bmp


Func _WallpaperChange($wallpaper="")

RegWrite("HKEY_CURRENT_USER\Control Panel\Desktop", "WallpaperStyle", "REG_SZ", 2)

RegWrite("HKEY_CURRENT_USER\Control Panel\Desktop", "TileWallpaper", "REG_SZ", 0)

$spi_setdeskwallpaper = 20

$spif_updateinifile = 1

$spif_sendchange = 2

DllCall("user32.dll", "int", "SystemParametersInfo", _

"int", $spi_setdeskwallpaper, _

"int", 0, _

"str", $wallpaper, _

"int", BitOR($spif_updateinifile, $spif_sendchange))

EndFunc ;==>_WallpaperChange

Share this post

Link to post
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
Sign in to follow this  

  • Recently Browsing   0 members

    No registered users viewing this page.

  • Create New...