Imprimir em 3 vias

[EderDias 0]

Olá...pessoal....eu tenho um relatorio em preciso imprimir em tres vias...até aqui tudo bem.....coloquei na copies=3

mas...eu gostaria que na:

 

primeira via imprimisse:

1-via do emitente

 

na segunda:

2-via do destinatario

 

na terceira:

3-via contabil.

 

Alguem poderia me explicar como proceder??

 

Grato

[lenn0n 0]

o quick eh meio chato pra fazer essas coisas...

você vai ter q usar o QRCompositeReport

 

eu achei assim no help

 

procedure MakeComp;begin	comprep := TQRCompositeReport.Create( mainfrm);	comprep.OnAddReports := mainfrm.CompRepAddReports;	comprep.Preview;	comprep.free;end;procedure Tmainfrm.SpeedButton1Click(Sender: TObject);begin	MakeComp;end;procedure Tmainfrm.CompRepAddReports(Sender: TObject);begin   comprep.Reports.Add( repfrm1.quickrep1 );   comprep.Reports.Add( repfrm2.quickrep1 );end;

eu entendo q você cria 3 quickreports iguais, só mudando o q você deseja, depois da um compositereport.reports.add(quickrep1)

pelo jeito soh tem como fazer isso via runtime mesmo...

localiza o arquivo na sua máquina chamado quickrep.hlp, é o help do quickreport

talvez ajude

 

[]'s