¿Cómo puedo imprimir la imagen de cada registro en un QReport?

[nuri]

Hola a todos:
Tengo una tabla que contiene un campo de tipo Blob Graphic, con Paradox.
Cuando deseo imprimir los registros, me imprimen todos los campos bien excepto el de la imagen k sólo me toma la imagen del primer registro para el resto de los registros.

El código k utilizo para cargar la imagen es

 FormImprime.QRDBImage1.Picture.LoadFromFile(FormImprime.Query1.FieldByName('FOTO').AsString);
  FormImprime.QuickRep1.PreviewModal;

Ya que a la hora de guardar la imgen lo almaceno como String la ruta de la imagen.

Si alguien me pudiera echar un cable.
Atentamente
Nuri

[marcoszorrilla]

El código tienes que ponerlo en el evento OnPrint del campo en cuestión en QuickReport.


Un Saludo.

[nuri]

No tengo ese evento en el cmponente TQRImage.
Tengo el Delphi 5.
Gracias de todas formas.
Atentamente
Nuri

[marcoszorrilla]

Pues utiliza directamente un QrDbImage y te ahorras el trabajo.

Un Saludo.

[nuri]

Lo he intentado pero me da el siguiente error:

Bitmap image is not valide

Atentamente
Nuri