Summary band and two pass page headers and footers
Hi,
I'm having to work on an app written in Delphi 5 and ReportBuilder
version 7.04. The report (two-pass) looks like :
Header
Detail
Footer
Summary Band (contains a subreport which works fine. But do not want the
main report Header and Footer on the Summary Band pages.)
I used code like below to hide the header and footer in D5/RB 7.04- but
the problem is that the header and footer always get hidden. So I tried
resetting the PrintingSummary variable to False on the
ppReport1.OnStartSecondPass event. That seemed to work until paging
backwards through the report, then the header and footer disappears on
all pages again. Any ideas on an event to catch in RB 7.04 that will
prevent losing the header and footer on the detail band pages when
paging backward? I've tried various and haven't got it to work.
I also own a personal version of ReportBuilder 14 and XE3, where I was
able to solve the problem in that version by doing this:
procedure TForm1.ppReport1BeforePrint(Sender: TObject);
begin
PrintingSummary := False;
end;
procedure TForm1.ppReport1StartPage(Sender: TObject);
begin
ppReport1.Footer.Visible := not PrintingSummary;
ppReport1.Header.Visible := not PrintingSummary;
end;
procedure TForm1.ppReport1StartSecondPass(Sender: TObject);
begin
PrintingSummary := False;
end;
procedure TForm1.ppSummaryBand1BeforePrint(Sender: TObject);
begin
PrintingSummary := True;
end;
However, I can't use my personal licenses at work and am stuck with the
old RB version because they can't/won't upgrade. It appears this got
fixed in RB somewhere along the way, so I'm guessing someone probably
figured out a workaround. Anyone have an idea how I can get this working
with D5 and RB 7.04?
I'm having to work on an app written in Delphi 5 and ReportBuilder
version 7.04. The report (two-pass) looks like :
Header
Detail
Footer
Summary Band (contains a subreport which works fine. But do not want the
main report Header and Footer on the Summary Band pages.)
I used code like below to hide the header and footer in D5/RB 7.04- but
the problem is that the header and footer always get hidden. So I tried
resetting the PrintingSummary variable to False on the
ppReport1.OnStartSecondPass event. That seemed to work until paging
backwards through the report, then the header and footer disappears on
all pages again. Any ideas on an event to catch in RB 7.04 that will
prevent losing the header and footer on the detail band pages when
paging backward? I've tried various and haven't got it to work.
I also own a personal version of ReportBuilder 14 and XE3, where I was
able to solve the problem in that version by doing this:
procedure TForm1.ppReport1BeforePrint(Sender: TObject);
begin
PrintingSummary := False;
end;
procedure TForm1.ppReport1StartPage(Sender: TObject);
begin
ppReport1.Footer.Visible := not PrintingSummary;
ppReport1.Header.Visible := not PrintingSummary;
end;
procedure TForm1.ppReport1StartSecondPass(Sender: TObject);
begin
PrintingSummary := False;
end;
procedure TForm1.ppSummaryBand1BeforePrint(Sender: TObject);
begin
PrintingSummary := True;
end;
However, I can't use my personal licenses at work and am stuck with the
old RB version because they can't/won't upgrade. It appears this got
fixed in RB somewhere along the way, so I'm guessing someone probably
figured out a workaround. Anyone have an idea how I can get this working
with D5 and RB 7.04?
This discussion has been closed.
Comments
Try setting Report.CachePages to True and see if that helps.
Going forward hope you and your company will be upgrading to the latest
version of ReportBuilder, which includes many powerful new features.
Here is a link to What's New for RB 16. (Use the side menu to see what
was new for prior releases)
http://www.digital-metaphors.com/rbWiki/General/What's_New/RB_16
Please consider upgrading your ReportBuilder license regularly. We are a
small team, the revenue from the product goes back into supporting the
RB community with tech support, bug fixes, and adding requested
features. We have a number of products we use here and upgrade them
every year, the authors are important to our business and we know they
need the support. It?s a win/win.
Nico Cizik
Digital Metaphors
http://www.digital-metaphors.com
as Nico mentioned it is absolutely worth to migrate to newer versions.
I am just reasearching an update from 5.56 to 16.02.
Lots of our added bugfixes had not to be reintroduced as RB evolved.
Even the support on this list our by mail is absolutely great!
Cheers
Carsten
Nico Cizik (Digital Metaphors) machte das folgende Beispiel :