Summary PrintPostion question

rbuser

Hello!

I have to create a report that fills a invoice-form.
The invoice-form is the same for every page, even if a invoice has more than
one page.

At the bottom of the invoice-form there is space for printing the summary,
which should be skipped for a more than one page invoice.
I keep this space blank by printing a footerband with the height of that
space. The footerband is set to not print on the last page.
The summaryband of the report should print on the last page at the same
postion as the footer would print.

I calculated the printposition of the summaryband this way:
PrintPosition=(PageHeight-(SummaryBandHeight+BottomMargin))
Units are millimeters.
In my case it is: (297-(16+10)) = 171.

But the summary does not print at this position.
The space for the details is enough for 12 Records.

If there are more than 1 record printed in the detail area, a second page is
printed with the summaryband beneath the header band.
I can't get the summaryband printet further down as 200mm.

What is wrong?

The Report is set up as follows:

Pagesize = DIN A4 (height = 297mm)
Margin top = 0
Margin bottom = 10mm

Title height = 142mm
Header height = 142mm (print on last page, do not print on first page)
Detail height = 10mm
Footer height = 16mm (print on first page, do not print on last page)
Summary height = 16mm
Summary printposition = 270mm

--
Regards

Strike.SoftwareSolutions

Wolfgang Bierl

digitalmetaphors

In what event are you setting the Summaryband.PrintPosition? Here is an
example:

http://www.digital-metaphors.com/tips/SummaryReplacesFooter.zip

Look for the code:

procedure TForm1.ppSummaryBand1BeforePrint(Sender: TObject);
begin
ppReport1.Footer.Visible := False;
ppSummaryBand1.PrintPosition := ppReport1.PrinterSetup.PaperHeight -
ppReport1.PrinterSetup.MarginBottom - ppSummaryBand1.Height;
end;



Cheers,

Jim Bennett
Digital Metaphors