Cargar un imagen a un Timage desde ORACLE

[kavisch]

Empezado por yusnerqui

Ya probastes asociarle un componente TDBImage al campo Imagen de la tabla?


Saludos

hola,

si, yo probe con un DBImage y me da un error que dice. EReadError with message 'Stream read error'.
por otro lado yo estuve utilizando el sienguente codigo:

var
bimp : TBitmap;
ms : TMemoryStream;
Begin

Image1.Visible := True;
bimp := TBitmapCreate;
ms := TMemoryStream.Create;
EmployFOTOGRAFIA.SaveToStream(ms);
bimp.LoadFromStream(ms);
Image1.Picture.Assign(bimp);
ms.Free;
bimp.Free;
end;

con esto simplemente no me muestra nada, no me da error pero no me muestra la imgagen.

[yusnerqui]

Creo que se te escapó un detalle, las imágenes que estás cargando son JPG y no las puedes asignar así directamente, tienes que primero hacer la conversión.

lo primero es agregar en el Uses la unidad "jpeg".

Después algo como esto:

Código Delphi [-]
  Var
    bimp : TJpegImage;
    ms : TMemoryStream;
   begin
     Image1.Visible := True;
     bimp := TJpegImage.create;
     ms := TMemoryStream.Create;
     EmployFOTOGRAFIA.SaveToStream(ms);
     bimp.LoadFromStream(ms);
     Image1.Picture.Assign(bimp);   
     ms.Free;
     bimp.Free;
   end

Bueno esto lo he hecho de memoria y mirando tu código, pero de seguro te ayudará a terminar de solucionar el problema.

Saludos

[kavisch]

primero quiero darte las gracias por el tiempo que has
dedicado para ayudarme..

intente llamarla como un JPG y me dio error : JPEG Error #42..

pero hay algo, la imagen que guardo en la base de dato Oracle es Bitmap
y por eso es que trato de capturarla asi...

Gracias..

[yusnerqui]

Empezado por kavisch

tabla1.FieldByName('Imagen').LoadFromFile('c:\ruta\imag.jpg',ftmemo);

Empezado por kavisch

pero hay algo, la imagen que guardo en la base de dato Oracle es Bitmap

Estás seguro?.

Por otra parte buscando en los foro he encontrado varios hilos sin respuestas con tu mismo problema:
Hilo1
Hilo2
Hilo3

He notado que para guardar la imágen no lo hacen directamente como propones, sino que usan el objeto TStream.

Saludos.

[kavisch]

Bueno yo te dije que es de tipo Bitmap porque yo capturo esa imagen
de una camara y la guardo como bitmap el el server y luego la gurado a la base de datos asi mismo. , pero ahora no se si es bitmap,

ya que me puse a verificar el hilo3 y intente capturar la imagen como el explica en el hilo, cuando lo ejecute no reconoce ninguno de los formatos, me explico , no es ni BMP , JPG O GIF, Si te das cuanta el lee el campo y pregunta de que tipo es para crear la imagen , en mi caso no entra en ninguno de estos bloques...

Gracias...