--- In [email protected], "swzoh" <[EMAIL PROTECTED]> wrote:
>
> --- In [email protected], "das_e_i" <das_e_i@> wrote:
> >
> > I uploaded a proper version, now employing GDI+ instead of that OLE
> > stuff I puzzled together before. Should work better I hope :)
> > Visual c++ 2008 runtimes will still be required though.
> >
> I once wrote a script to change the wallpaper via ActiveDesktop in XP.
> http://tech.groups.yahoo.com/group/power-pro/message/29860
>
Wow. Just tried it, it works. How does it work?
Here is Sean's referenced message:
This will work only in XP, and possibly higher. So, please don't run
it in other OS's. It will set BMP/GIF/JPG/PNG files to the wallpaper.
Although it uses the ActiveDesktop interface, ActiveDesktop needs not
stay enabled as far as I can tell. Needs the latest com/dll/unicode
plugins. The usage is
.SetWallpaper(?"path_to_image_file")
--------------------- SetWallpaper.PowerPro --------------------------
local wFile=unicode.new(arg(1))
local pIAD=com.get_interface(;;+
"{75048700-EF1F-11D0-9888-006097DEACF9}",;;+
"{F490EB00-1240-11D1-9888-006097DEACF9}")
local vt=dll.create_array(dll.dereference(pIAD),22)
dll.call(vt[6]++"|ui w ui",pIAD,wFile,0)
dll.call(vt[4]++"|ui ui",pIAD,7)
dll.call(vt[3]++"|ui",pIAD)
quit
----------------------------------------------------------------------
