Cargar Imagenes
#1
Posted 28 September 2010 - 09:58 AM
Una preguntonta.... qué componente me sugieren para cargar cualquier tipo de imágenes (*.jpeg, *.jpg, *.ico, *.bmp, *.gif).... etc ?
Grax a todos por su ayuda !!!
#2
Posted 28 September 2010 - 09:59 AM
#3
Posted 28 September 2010 - 10:01 AM
¿Con cuales fines necesitas subir la imagen? Porque si es para imprimirla puedes tener ciertos inconvenientes.
#4
Posted 28 September 2010 - 10:02 AM
Bitmap Image is not valid
Saludox !
#5
Posted 28 September 2010 - 10:03 AM
Pero si quiero cargar un bitmap o un gif con el TImage me produce el siguiente error:
Bitmap Image is not valid
Saludox !
Pero en tiempo de ejecución??? o en diseño???
#6
Posted 28 September 2010 - 10:03 AM
Saludos.
¿Con cuales fines necesitas subir la imagen? Porque si es para imprimirla puedes tener ciertos inconvenientes.
En un Grid tengo cargadas las rutas de ciertas imágenes guardadas en la PC, lo que deseo es que cuando pase por un registro, se cargue su imágen correpondiente....
Saludox !
#7
Posted 28 September 2010 - 10:07 AM
*.jpeg, *.jpg, *.ico, *.bmp, No hay problema con TImage, el gif no creo.
Saludos
#8
Posted 28 September 2010 - 10:07 AM
Pero si quiero cargar un bitmap o un gif con el TImage me produce el siguiente error:
Bitmap Image is not valid
Saludox !
Pero en tiempo de ejecución??? o en diseño???
En ambos casos me manda el mismo error....
En caso de quiera cargar un *.gif me envía el error:
"Unknown picture file extension"
Saludox !
#9
Posted 28 September 2010 - 10:12 AM
En ambos casos me manda el mismo error....
En caso de quiera cargar un *.gif me envía el error:
"Unknown picture file extension"
Saludox !
Bastante extraño, versión de Delphi??
#10
Posted 28 September 2010 - 10:13 AM
En ambos casos me manda el mismo error....
En caso de quiera cargar un *.gif me envía el error:
"Unknown picture file extension"
Saludox !
Bastante extraño, versión de Delphi??
D2007
Saludox !
#11
Posted 28 September 2010 - 10:14 AM
La suite de los JEDI tienen el componente TJvImage que soporta muchos formatos a excepción del PNG, por lo menos en la que tengo instalada acá en el trabajo (3.37).
#12
Posted 28 September 2010 - 10:21 AM
Mira este ejmplo tal vez te de alguna idea:
Carga las imagenes desde un ListBox.
Saludos
Attached Files
#13
Posted 28 September 2010 - 10:21 AM
Me estoy dando cuenta de que no todos los *.bmp me provocan errores ... ésto es aún más extraño de lo que pensaba.... sigo investigando
Saludox !
#14
Posted 28 September 2010 - 10:29 AM
var m : TStream; /* Tienes q hacer un stream del archivo, aquí proviene de un blob de un registro de una tabla de base de datos*/ m := MainModule.ZTable1.CreateBlobStream(MainModule.ZTable1IMG, bmRead); try SetLength(FirstBytes, 8); m.Read(FirstBytes[1], 8); if Copy(FirstBytes, 1, 2) = 'BM' then Image1.Picture.Graphic := TBitmap.Create else if FirstBytes = #137'PNG'#13#10#26#10 then Image1.Picture.Graphic := TPngImage.Create else if Copy(FirstBytes, 1, 3) = 'GIF' then Image1.Picture.Graphic := TGIFImage.Create else if Copy(FirstBytes, 1, 2) = #$FF#$D8 then Image1.Picture.Graphic := TJPEGImage.Create; try m.Seek(0,0); Image1.Picture.Graphic.LoadFromStream(m); except end; finally m.Free; end;
Primero declaras tu variable de tipo TStream, tienes que crearte un stream de tu archivo de imagen antes del Try, porque de esta forma podremos determinar q tipo de imagen va contener TImage y prepararlo, despues asignamos el stream con LoadFromStream y liberamos m; soporta PNG, GIF, BMP y JPEG;
Las units necesarias son: pngimage, GIFImg, jpeg;
Espero te sea de ayuda!
#15
Posted 28 September 2010 - 10:33 AM
Lo reviso y les comento va ?
Saludox !
#16
Posted 28 September 2010 - 10:37 AM
Salud OS
#17
Posted 28 September 2010 - 10:40 AM
En alguna ocasión tuve problemas al cargar este tipo de imagen bmp, mi solución fue "bajarle" el peso.
Saludos!
#18
Posted 28 September 2010 - 10:44 AM
Me estoy dando cuenta de que no todos los *.bmp me provocan errores ... ésto es aún más extraño de lo que pensaba.... sigo investigando
Me solía pasar al tratar de reducir el tamaño de un bmp con algun software o modificaba ciertas características, esos archivos problemas trata de abrirlos con paint, guardalo como bmp normal y pruebas.
Saludos
#19
Posted 28 September 2010 - 10:45 AM
Solo un detalle, PNGImage no está disponible en D2007, me parece que es hasta 2009.
Desconocía este detalle, yo tengo delphi 2010.