Test Foro de elhacker.net SMF 2.1

Programación => .NET (C#, VB.NET, ASP) => Programación General => Programación Visual Basic => Mensaje iniciado por: pastillas en 12 Abril 2008, 19:40 PM

Título: fondo de pantalla
Publicado por: pastillas en 12 Abril 2008, 19:40 PM
como hago para cambiar el fondo de pantalla?? (que el basic tome una imagen q tengo en el disco y la ponga como fondo de pantalla...) y esto se puede hacer en una maquina sin privilegios de administrador?
Título: Re: fondo de pantalla
Publicado por: seba123neo en 12 Abril 2008, 19:49 PM
Hola,se puede hacer con una api llamada SystemParametersInfo,algo asi Declaras:

Private Declare Function SystemParametersInfo Lib "user32" Alias "SystemParametersInfoA" (ByVal uAction As Long, ByVal uParam As Long, ByVal lpvParam As String, ByVal fuWinIni As Long) As Long
Const SPI_SETDESKWALLPAPER = 20
Const SPIF_UPDATEINIFILE = &H1
Const SPIF_SENDWININICHANGE = &H2


y despues la usas asi:

Dim Ruta As String
Dim ret As Long
FileName = "c:\foto.bmp"
ret = SystemParametersInfo(SPI_SETDESKWALLPAPER, 0&, Ruta, SPIF_UPDATEINIFILE Or SPIF_SENDWININICHANGE)


y si queres vos mismo elegir la foto,pones un control commondialog o con la api como quieras para mostrar la ventana de abrir archivo y despues la variable que retorna la ruta de la imagen seleccionada,la igualas con la variable FileName..

saludos.