Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Impresión (https://www.clubdelphi.com/foros/forumdisplay.php?f=4)
-   -   Imprimir varias copias en fastReport (https://www.clubdelphi.com/foros/showthread.php?t=62026)

DANY 01-12-2008 19:55:17

Imprimir varias copias en fastReport
 
Voy al grano.
Necesito que desde el editor de codigo de FastReport , dependiendo del tipo de comprobante se impriman varias copias.
lo que hice fue guardar en el evento OnStarReport el siguiente codigo:
Código Delphi [-]
if Trim( )='FA' then
  Begin
    report.PrintOptions.Copies:=3;                                           
  End
  Else
  Begin
    report.PrintOptions.Copies:=2;                                           
End;
Si previzualiso el reporte me predetermina bien el numero de copias.
Pero luego cuando la aplicacion manda a imprimir de la siguiente forma:

Código Delphi [-]
Reporte.PrintOptions.ShowDialog := False ;
Reporte.Print ;
Manda a imprimir el numero de copias almacenado en el objeto report y no las indicadas por codigo.

Saludos...

Combat-F2D 02-12-2008 07:34:32

prueba con:

Código Delphi [-]
  frxReportEtiqueta.PrintOptions.Printer := 'la impresora que sea';
  frxReportEtiqueta.PrintOptions.ShowDialog := False;
  frxReportEtiqueta.PrintOptions.Copies := EditNCopias.AsInteger;

  frxReportEtiqueta.PrepareReport;
  frxReportEtiqueta.Print;

DANY 02-12-2008 21:43:24

No me explique bien.
El diseño de los repotes se guardan el la base de datos.
Un cliente puede utilizar 3 copias y otro 2, el ejecutable no cambia.
por eso quiero configurar la cantidad de copias desde el propio fast Report.
por eso desde el editor de codigos de fastReport Hago:
Código Delphi [-]
procedure FacturaMatricialOnStartReport(Sender: TfrxComponent);
begin
  
  if Trim( F."TipoComprobante")='FA' then
  Begin
    report.PrintOptions.Copies:=3;                                           

  End
  Else
  Begin
    report.PrintOptions.Copies:=2;                                           
  

  End;            
    
end;

pero cuando mando a imprimir sin vista previa no respeta el codigo desde el editor de fast.


La franja horaria es GMT +2. Ahora son las 08:31:40.

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