Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Impresión (https://www.clubdelphi.com/foros/forumdisplay.php?f=4)
-   -   ¿Cómo puedo imprimir la imagen de cada registro en un QReport? (https://www.clubdelphi.com/foros/showthread.php?t=23719)

nuri 26-07-2005 18:55:25

¿Cómo puedo imprimir la imagen de cada registro en un QReport?
 
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
Código:

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 26-07-2005 19:11:12

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


Un Saludo.

nuri 27-07-2005 09:34:40

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

marcoszorrilla 27-07-2005 09:52:04

Pues utiliza directamente un QrDbImage y te ahorras el trabajo.

Un Saludo.

nuri 27-07-2005 09:58:59

Lo he intentado pero me da el siguiente error:
Código:

Bitmap image is not valide
:confused:
Atentamente
Nuri


La franja horaria es GMT +2. Ahora son las 21:22:51.

Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi