Home General
New Blog Posts: Merging Reports - Part 1 and Part 2

Printing n no of copies

edited February 2002 in General
I am using Report builder 6.03 and Delphi 5 on Win98.

I have a simple report label which I print to a DataMax Allegro Printer. The
user has an option to set up the no of copies of the labels he wants to
print. For the particular report before the print I set the no of copies to
the Reports Printer object.The report prints fine as expected - 'n' no of
copies are printed , but there seems to be time delay (pause) in between
each copy which becomes considerable when printing say 20 copies.

If the user sets up the no of copies in his local printer setting the same
no of copies is printed in a breeze without a time delay between copies i.e
if i do not set the no of copies through the reoprts printer object.

How do I get about having the similar behaviour as when I set the no of
copies in the local printer setting?
--
Srikumar.S

Comments

  • edited February 2002
    -------------------------------------------------------
    Tech Tip: Printing a Unique Caption for each copy of
    of a multi-copy report sent to the printer.
    -------------------------------------------------------


    Here's example of sending 3 copies to the printer and printing a unique
    caption for each one.


    1. Set Report.PrinterSetup.Collation to True

    2. Set Report.PrinterSetup.Copies to 3


    2. Set the Report.PassSetting to psTwoPass. (add ppTypes to your "uses"
    clause)

    3. Create a private variable in your form: FCopy

    4. In the Report.BeforePrint event code

    FCopy := 0;

    5. In the Report.OnStartPage event code

    if ppReport1.SecondPass and (ppRepor1.AbsolutePageNo = 1) then
    Inc(FCopy);


    6. Add a Label to the Report and in the OnPrint event code something like:

    case FCopy of
    1: ppLabel1.Caption := 'Shipping';
    2: ppLabel1.Caption := 'Order Processing';
    3: ppLabel1.Caption := 'Account Receivable';
    end;



    --
    Tech Support mailto:support@digital-metaphors.com
    Digital Metaphors http://www.digital-metaphors.com
  • edited February 2002
    The Tech tip given is unrelated to the problem I am facing. I do not want to
    print diff captions for each copy.

    My problem is that when printing multiple copies set through
    Report.PrinterSetup.Copies there is a pause in between copies where as when
    I set the no of copies directly in the local printer there is no pause in
    between copies.

    --
    Srikumar.S

  • edited February 2002
    Set Report.PrinterSetup.DelegateCopies := True;

    --
    Tom Ollar
    Digital Metaphors Corporation
  • edited February 2002
    Thanks it works but only if the collation is set to false? Why can't I use
    collation to true and use the printer drivers settings to print copies?

    --
    Srikumar.S

This discussion has been closed.