RB 7.04 and Copies and PrintJob

rbuser

Hi!

A customer wants that every Copie of the print is a seperate printjob.
Can this be done? And how? Thank you.

Gruß aus den Bergen
Günter

nardmoseley

Try writing a loop...

Example:

liCopies := myReport.PrinterSetup.Copies;

myReport.PrinterSetup.Copies := 1;
myReport.ShowPrintDialog := False;

for liIndex := 0 to liCopies-1 do
myReport.Print;

--
Nard Moseley
Digital Metaphors
www.digital-metaphors.com

rbuser

In article <45e2f6fd$3@mail.>, Nard Moseley (Digital Metaphors) wrote:

Hmm, not a perfect way - because the customer often select the copies
in the printdialog, and than the report is already running. I tried to
use PrinterDevice.EndJob and StartJob in the AfterPrint-Event but it
was not working.
Bad news for me and my customer, he have a new printer which is
'pinning' every printjob and now all copies are pinned together

Gruß aus den Bergen
Günter

nardmoseley

Try setting PrinterSetup.DelegateCopies to True, then the printer driver
will handle the copies, rather than RB. Not all printer drivers support
Copies, but if the printer you are using has this feature, then it would
probably pin/stable each copy correctly.

Example:

uses
ppPrintr;

myReport.PrinterSetup.DelegateCopies := True; // allow printer to handle the
copies
myReport.Print;



--
Nard Moseley
Digital Metaphors
www.digital-metaphors.com

rbuser

In article <45e31f6b@mail.>, Nard Moseley (Digital Metaphors) wrote:

I will try this. But this will not allow to change the layout of the copy.
Thank you.

Gruß aus den Bergen
Günter