Foro de elhacker.net

Programación => Programación Visual Basic => Mensaje iniciado por: MANULOMM en 28 Septiembre 2006, 06:52 am

Título: Fondo de Escritorio.....
Publicado por: MANULOMM en 28 Septiembre 2006, 06:52 am

Hola Estoy Tratando de Hacer una aplicacion que cambie el fondo del escritorio de windowx xp....
Pero no meda aqui posteo mi codigo,

Código:

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

Private Sub cmdAceptar()
    Dim fallo As Integer
    fallo = SystemParametersInfo(20, 0, C:\WINDOWS\AROS.BMP", 0)
End Sub

Título: Re: Fondo de Escritorio.....
Publicado por: ~~ en 28 Septiembre 2006, 17:02 pm

Hola:

Te faltan las comillas:

Código:

Private 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

Private Sub Form_Load()
Dim fallo As Integer
fallo = SystemParametersInfo(20, 0, "C:\WINDOWS\FONDO.BMP", 0)
End Sub

kedaria asi ;)
1S4ludo