Wallpaper funtion

Hejsa.

Udmiddelbart kan vi ikke lige svare på dit spørgsmål, men se eventuelt om du kan bruge nogle af de visual basic links vi har på vores side: www.theportal.dk
Gå ind under Links og helt ned i bunden. Her finder du links til sider hvor du kan finde sourcecodes og components. Der MÅ være noget på disse sider som du kan bruge.
Vi vil prøve at se om vi kan finde noget til dig - herefter kan vi komme med et fortsat svar m. linket!

Hvis og når du finder komponenten/sourcekoden, skal du bare lave en exe fil som starter med at udføre det som der skal til for at ændre dit wallpaper hvorefter programmet afslutter sig selv med "End" kommandoen.

Håber du kan bruge disse links...
/The Portal

Du kan evt. også se om du kan finde svaret her:
http://www.eksperten.dk/spm.asp?id=9849

/The Portal

Så har vi koden!

Lav et Modul og indsæt følgende kode:
-----

Declare Function SystemParametersInfo Lib "user32" Alias "SystemParametersInfoA" (ByVal uAction As Long, ByVal uParam As Long, ByVal lpvParam As Any, ByVal fuWinIni As Long) As Long
Public Const SPI_SETDESKWALLPAPER = 20

-----
Lav en form og indsæt følgende kode - evt. i Form_Load:
-----

Dim lngSuccess As Long
Dim strBitmapImage As String
strBitmapImage = "c:\windows\bolte.bmp"
lngSuccess = SystemParametersInfo(SPI_SETDESKWALLPAPER, 0, strBitmapImage, 0)

-----

Håber at koden kan bruges!

/The Portal

Hvor der står
strBitmapImage = "C:\windows\bolte.bmp"
kan du jo selv skrive placeringen af bmp filen...

/The portal

Hvis i bruger MS IE, så er der en funtion der hedder "anvend som tapet på skriverbordet"

Noget der ligner denne funtion, måske et api kald.

Fandt den selv.