FTP | CCD | Buscar | Trucos | Trabajo | Foros |
|
Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Temas de Hoy |
|
Herramientas | Buscar en Tema | Desplegado |
|
#1
|
|||
|
|||
Como Cambiar El Papel Tapiz De Windows
Holas, Espero que me puedan ayudar programo en delphi 6 me aria falta saves como cambiar el fondo de pantalla(wallpaper o paperl tapiz) de windows, yo lo hago con SystemParametersInfo(SPI_SETDESKWALLPAPER,0,PChar('direccion'),SPIF_UPDATEINIFILE); //en direccion va la direccion de donde se encuantra la imagen por ejemplo: C:\dagsoft.bmp, pero mi problema es el siguiente: " Este codigo es solamente para establecer como wallpaper archivos .Bmp y me hace falta poner un jpg
Si alguien sabe como poner con delphi como fondo de pantalla un archivo *.jpg o *.gif que me diga please Saludos DG |
#2
|
||||
|
||||
Realmente tiene que ser mas sencillo que esto, pero he tratado de ser algo recursivo con el asunto... , convirtiendo de Jpg a Bmp y luego cambiando el papel tapiz.
Sacando los dos trucos del trucomania Primero hay que añadir Jpeg a tu unidad.
Y...
es un ejemplo...Espero te sirva de algo.
__________________
Lecciones de mi Madre. Tema: modificación del comportamiento, "Pará de actuar como tu padre!" http://www.purodelphi.com/ http://www.nosolodelphi.com/ Última edición por jhonny fecha: 06-11-2004 a las 17:36:40. |
#3
|
|||
|
|||
Muchas Gracias, Esto me va a servir temporalmente porque cuando vos pasas un *.png, *.gif o *.jpg se pierde toda calidad, aparte si pasas de un gif a un *.bmp perdes los movimientos.
Entendes?= Espero que me entindas Saludos Daniel Muchas Gracias |
#4
|
||||
|
||||
Cita:
__________________
Lecciones de mi Madre. Tema: modificación del comportamiento, "Pará de actuar como tu padre!" http://www.purodelphi.com/ http://www.nosolodelphi.com/ |
#5
|
|||
|
|||
Problemas y gracias
sip tenes razón!!!!
gracias pero tengo problema con el codigo que me mandaste me marca error en MyJPEG : TJPEGImage; MyBMP : TBitmap; me dice [Error] Unit1.pas(178): Undeclared identifier: 'TJPEGImage' [Error] Unit1.pas(181): Missing operator or semicolon y en esta parte no puedo poner asi LoadFromFile(edit1.Text + ListBox1.Items.Strings[listbox1.ItemIndex]);//logo es la imagen JPG ya que:
Saludos DG Espero que me puedan ayudar |
#6
|
||||
|
||||
Cita:
__________________
Lecciones de mi Madre. Tema: modificación del comportamiento, "Pará de actuar como tu padre!" http://www.purodelphi.com/ http://www.nosolodelphi.com/ |
|
|
|