Fondo de agua QuickReport.

[HombreSigma]

Si ya se que debe ser una pregunta repetida !!

Pero, en el buscador encuentro varios temas pero ninguno responde la pregunta.

Si existe el tema con la respuesta por favor indicarme el enlace.

Sino, como le hago para colocar un fondo de agua con quickreport en Delphi7?

He intentado con el TQRImage pero no hallo una propiedad transparent o algo así.

Gracias por la información.

[koalasoft]

Esto la verda tambien lo que buscado y nada ..

alguine lo ha hecho o sabe si se puede hacer ..

Eh intentado con delphi7 y QuickReport 4.0 y no se puede segun lso codigos que vi aqui ..

Alguna idea ??


Saludos !!

[marcoszorrilla]

Prueba este código a ver:

Código Delphi [-]
 procedure TForm1.QuickRep1EndPage(Sender: TCustomQuickRep);
 VAR
 bmp : tBitmap;
 w,h : Integer;
 begin
 bmp := Tbitmap.Create;
 Try
   bmp.loadFromFile('C:\Delphi\Programas\Palma\Palma.bmp');
   //Añadido por mí
   bmp.Transparent:=True; ;
   Bmp.TransParentColor := BMp.canvas.pixels[50,50];
   Bmp.TransparentMode := tmAuto;
   //fin añadido
   w := bmp.width;
   h := bmp.height;
   Quickrep1.QRPrinter.Canvas.draw(
                  (Quickrep1.Width-w) DIV 2,
                  ( Quickrep1.height-h) DIV 2,
                   bmp);
 Finally
  bmp.free;
 End;
 
 end;

Un Saludo.

[koalasoft]

Si funciona ... pero la imagen que carga aparece ENCIMA de las letras y no de tras de ellas ... vaya no aparece al fondo.

Alguna idea ?

[koalasoft]

Alguna otra idea o algo que se pueda hacer ??

[FOURIER]

PONGAN PRIMERO EL QRIMAGE y DESPUES LOS QRDBTEXT y QRLABEL DE ESTA FORMA ESTARAN LOS TEXTOS ARRIBA DE LA IMAGEN

[[Lepe]]

Aqui tienes, en estos mismos foros el componente TQRAquaMark


saludos