24 replies to this topic

[Fenareth]

Hola chicos y chicas de por aquí....

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 !!!

[enecumene]

TImage?   

[Rolphy Reyes]

Saludos.

¿Con cuales fines necesitas subir la imagen? Porque si es para imprimirla puedes tener ciertos inconvenientes.

[Fenareth]

Pero si quiero cargar un bitmap o un gif  con el TImage me produce el siguiente error:

Bitmap Image is not valid 

Saludox !

[enecumene]

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???

[Fenareth]

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 !

[Caral]

Hola
*.jpeg, *.jpg, *.ico, *.bmp, No hay problema con TImage, el gif no creo.
Saludos

[Fenareth]

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 !

[enecumene]

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??

[Fenareth]

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 !

[Rolphy Reyes]

Saludos.

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).

[Caral]

Hola
Mira este ejmplo tal vez te de alguna idea:
Carga las imagenes desde un ListBox.
Saludos

Attached Files

•  1820_63f6472812fb55c3ef29a685c2350da7e35c9eb4.zip   339.7KB   12 downloads

[Fenareth]

Gracias Rolphy lo reviso ....

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 !

[fredycc]

Q tal Fenareth, yo uso ese código para desplegar varios tipos de imágenes en un objeto TImage con base de datos:

delphi

        
        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!

[Fenareth]

Gracias amigo fredycc !!!!

Lo reviso y les comento va ?

Saludox !

[egostar]

Solo un detalle, PNGImage no está disponible en D2007, me parece que es hasta 2009.

Salud OS

[felipe]

Yo creería Fena que es debido a la calidad o cantidad de información de la imagen, una fotografía o imagen en JPG se guarda a 8 bits, un bmp puede estar entre 24 y 8.

En alguna ocasión tuve problemas al cargar este tipo de imagen bmp, mi solución fue "bajarle" el peso.


Saludos!

[fredycc]

Claro Fenareth, revísalo, a mi me funciona también con uniGUI, el framework para aplicaiones web en delphi; con respecto a tu anterior comentario:

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

[fredycc]

gracias egostar por el apunte:

Solo un detalle, PNGImage no está disponible en D2007, me parece que es hasta 2009.

Desconocía este detalle, yo tengo delphi 2010.

[Wilson]

Estos componentes son muy buenos y muy bien documentados y ya son libres.

Saludos