Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Impresión (https://www.clubdelphi.com/foros/forumdisplay.php?f=4)
-   -   mostrar imagen pero no imprimirla (https://www.clubdelphi.com/foros/showthread.php?t=68398)

yossi 11-06-2010 03:33:04

mostrar imagen pero no imprimirla
 
hola, tengo un qreport en el que tengo 2 imagenes y 2 qrexpr que quiero que se muestre pero que no se impriman, al qreport lo llamo con el .preview; y quiero que cuando se le de a imprimir esas imagenes y esos qrexpr se pongan invisibles

Caral 11-06-2010 03:40:39

Hola
Tal vez:
Código Delphi [-]
procedure TQreport1.QuickRepAfterPrint(Sender: TObject);
begin
   QRImage1.Enabled:= False;
end;
Saludos

yossi 11-06-2010 06:09:25

bueno ese codigo lo pense pero no funciono buscando y buscando encontre uno que lo hacia pero en los eventos de las bandas before y after y quedo bien.

tengo otro problema que no tiene que ver con este pero si me puedes ayudar seria muy amable de tu parte

cuando le doy click a la impresora en el preview de qreport imprime bien pero se quita la hoja del preview y tengo que imprimir varias copias de esa pagina y por separado una primero y luego otra

que pasa? porque se quita?

yossi 26-06-2010 15:54:42

hola necesito ayuda urgente con este tema tengo que entregar el programa esta semana

este es el codigo que utilizo

procedure Treporte.QRBand1AfterPrint(Sender: TQRCustomBand;
BandPrinted: Boolean);
begin
vecesimpreso:=vecesimpreso+1;
end;

procedure Treporte.QRBand1BeforePrint(Sender: TQRCustomBand;
var PrintBand: Boolean);
begin
if VecesImpreso > 0 then
begin
qrImage1.Picture := Nil;
qrImage2.Picture := Nil;
end;
end;

funciona bien la primera vez, lo muestra pero no lo imprime pero la segunda no muestra las imagenes

auxilio


La franja horaria es GMT +2. Ahora son las 14:52:43.

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