Ver Mensaje Individual
  #6  
Antiguo 10-12-2016
rruffino rruffino is offline
Miembro
 
Registrado: dic 2004
Ubicación: Berrotaran, Cordoba - Argentina
Posts: 215
Reputación: 20
rruffino Va por buen camino
Respuesta

Hola!, gracias por la respuesta.... En realidad estoy intentando lo que has entendido, pero al no resultar hacerlo, lo que estoy intentando hacer para ver donde tengo el problema es tratar de leer de la base de datos origen (SQLlite) y pasar la imagen a un compronente TImage, con el siguiente código:

Código Delphi [-]
                    Stream:=TMemoryStream.Create;
                    TBlobField(DM.ZQuery_lectura.FieldByName('foto')).SaveToStream(Stream );
                    Stream.Seek(soFromBeginning, 0);
                    jpg:=TJPEGImage.Create;
                    Image10.Picture.Bitmap.LoadFromStream(Stream);
                    Stream.Free;

Utilizo Delphi 7, y los componentes Zeos. Al momento de la ejecución tira el error "Stream read error", como si el stream no tuviera dato alguno.
Mas alla del error, la imagen la puedo ver cargada en campo foto desde el gestor, es una imagen PNG.
Aguardo su ayuda compañeros, esto me esta secando la cabeza.
Gracias!!
Responder Con Cita