Imagenes en Quick Report Dinamicamente

[Panasys]

Hola amigos, uso Quick Report y Delphi 7.

Voy a tratar de explicar mi problema.

En un reporte (hecho con quick report) por cada hoja obtengo datos, pero en cada hoja yo debo tener una imagen diferente, creada a partir de los registros que levanta de una tabla.

Por que hago esto? En un QRImage asigno un bitmap creado por un componente de Codigo de Barras en 2D.

Como no tengo un componente para quick report lo hago asi, para un registro funciona ok.

Pero si la tabla tiene 100 registros tengo que poder asignarles las imagenes de forma dinamica y cada diferente para cada registro.

Una especie de while donde le asigne imagenes, pero no se como se hace con quick report.

Me explique mas o menos ?

Gracias y un abrazo !

[Panasys]

Encontre un POST de Rufo donde lo solucionaba. :D

Asi que para quienes utilicen Zint BarCode, les comento que no tiene el componente para QuickReport, asi que lo solucione de la siguiente forma en el QuickReport. :cool:

procedure TFImprimirTarjetas.DetailBand1BeforePrint(Sender: TQRCustomBand; var PrintBand: Boolean);
Var b : TBitmap;
begin
with FData.TTarjetas do
begin
b := TBitmap.Create;
CodBarra.Barcode.Data:= FData.TTarjetas.FieldByName('ID').Value;
CodBarra.barcode.GetBarcode(b);
QRImage1.Picture.Bitmap := b;
End;
end;

Con el ZintBarCode obtenemos el bitmap y de ahi lo asignamos al QRImage registro por registro. :eek:

Abrazos... :D

[santiago14]

Muy buen aporte.
Gracias. :cool:

Santiago.

[AzidRain]

También te funciona modificando el evento onprint del QRImage que hayas utilizado, ese evento se dispara cada vez que se imprime el mismo. Lo ideal es generar el código QR al momento de crear el registro ya que así no necesitas componentes adicionales, pero claro si el qr se forma con datos que pueden variar la solución que pones es la correcta, aunque es mejor usar la del propio qrimage ya que es independiente de la banda donde se encuentre.

[Panasys]

Hola AzidRain:

Es cierto lo que dices, pero como son tarjetas y el reporte se limita solo a imprimir tarjetas las bandas estan personalizadas y utilizadas para ese solo fin.

Pero es bueno mostrar mas opciones o soluciones, un abrazo.

Javier