Cargar Imagenes
#1
Escrito 28 septiembre 2010 - 09:58
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
Escrito 28 septiembre 2010 - 09:59
#3
Escrito 28 septiembre 2010 - 10:01
¿Con cuales fines necesitas subir la imagen? Porque si es para imprimirla puedes tener ciertos inconvenientes.
#4
Escrito 28 septiembre 2010 - 10:02
Bitmap Image is not valid
Saludox !
#5
Escrito 28 septiembre 2010 - 10:03
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
Escrito 28 septiembre 2010 - 10:03
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
Escrito 28 septiembre 2010 - 10:07
*.jpeg, *.jpg, *.ico, *.bmp, No hay problema con TImage, el gif no creo.
Saludos
#8
Escrito 28 septiembre 2010 - 10:07
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
Escrito 28 septiembre 2010 - 10:12
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
Escrito 28 septiembre 2010 - 10:13
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
Escrito 28 septiembre 2010 - 10:14
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
Escrito 28 septiembre 2010 - 10:21
Mira este ejmplo tal vez te de alguna idea:
Carga las imagenes desde un ListBox.
Saludos
Archivos adjuntos
#13
Escrito 28 septiembre 2010 - 10:21
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
Escrito 28 septiembre 2010 - 10:29
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
Escrito 28 septiembre 2010 - 10:33
Lo reviso y les comento va ?
Saludox !
#16
Escrito 28 septiembre 2010 - 10:37
Salud OS
#17
Escrito 28 septiembre 2010 - 10:40
En alguna ocasión tuve problemas al cargar este tipo de imagen bmp, mi solución fue "bajarle" el peso.
Saludos!
#18
Escrito 28 septiembre 2010 - 10:44
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
Escrito 28 septiembre 2010 - 10:45
Solo un detalle, PNGImage no está disponible en D2007, me parece que es hasta 2009.
Desconocía este detalle, yo tengo delphi 2010.