Delphi - Imagenes desde Access

 
Vista:

Imagenes desde Access

Publicado por Jose (1 intervención) el 07/12/2006 18:52:11
No sabia si poner esto aqui o en el foro de BD así que...

Tengo una base de datos en Access (si ya se que podria haber elegido mejor) en la que almaceno unas fotos (objeto OLE), mediante un query selecciono las fotos y presento la seleccionada en un TImage de la siguiente manera:

iBS:=TBlobStream.Create(qrGenerica.FieldByName('Radiografia') as TBlobField,bmRead);
iBS.Position:=0;
B:=TBitmap.Create;
B.LoadFromStream(iBS as TStream);
imRadiografia.Picture.Assign(B);
B.Free;
iBS.Free;

La cosa está en que me muestra la imagen pero mal, una gran parte de ella me la pone en negro y solo se ve el 10% inferior de la imagen.

¿Alguien sabe que es lo que esta pasando?¿Es problema del Access o estoy haciendo algo mal?
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder