[VB6] Sfondo desktop

[master666]

Ciao a tutti.. qualcuno mi sa dire se c'è un API o qualcuno ha il codice per cambiare lo sfondo del desktop (con una pagina html lo voglio cambiare). grazie!

[tas]

Esiste la funzione API SetWallpaper che trovi dentro alla libreria shell32.dll, per info guarda qui:
http://msdn.microsoft.com/library/de...tWallpaper.asp

Ciao

[denadai2]

ma è visual basic?

[tas]

No, non è VB ma è la documentazione ufficiale del metodo. Un link con un esempio che sfrutta un'altra API:
http://www.devx.com/vb2themax/Tip/19204

[master666]

allora... io ho fatto così:

Dim t As Long
Dim Wallpaper As String
Wallpaper = "C:\sfondo.html"
If Wallpaper = "" Then Exit Sub
t = SystemParametersInfo(ByVal 20, vbnostring, ByVal Wallpaper, &H1)
If t = 0 Then
    MousePointer = 0
    Exit Sub
End If

e in un modulo

Declare Function SystemParametersInfo Lib _
   "user32" Alias "SystemParametersInfoA" _
   (ByVal uAction As Long, ByVal uParam As Long, _
   lpvParam As Any, ByVal fuWinIni As Long) As Long

Lo sfondo me lo cancella, ma non mi mette come sfondo la pagina html. funziona con le bmp.