Print Report Summary Band at the bottom of the page

WernerHo

Hi there
sorry for my english....
Like the Title says: I would like to have in my ReportSummary (Part of my Business-Software with Fastreport 5.1.1) at the bottom of the page every time. Normaly it's printed out directly after the last position.
I found another Thread with the same Title for the Fastreport 3.0 out of 2005, but this doesn't work or I placed it in the wrong way.
The Code there is:

procedure ReportSummary1OnBeforePrint(Sender: TfrxComponent);
begin
Engine.CurY := Engine.CurY + Engine.FreeSpace - ReportSummary1.Height - 1;
end;

End the User said it works.
I tried this Code in all offered different Script-Languages (JScript, BasicScript, C++Script, PascalScript) but it doesn't work.
Sorry I'm a really Newbie in this and so:
Anybody out there who can give a little help?

Moe4Rae

procedure ReportSummary1OnAfterCalcHeight(Sender: TfrxComponent);
begin
if Engine.FreeSpace < ReportSummary1.Height then Engine.NewPage;
  Engine.CurY := Engine.CurY + Engine.FreeSpace - ReportSummary1.Height - 0.00001; 
end;

Use the above code and see if that helps. Also ensure that it iset to the OnAfterCalcHeight Event and not the OnBeforePrintEvent

gpi

If you use stretched ReportSummary band - use OnAfterCalcHeight event, for non-stretched ReportSummary you may use OnBeforePrint or OnAfterCalcHeight events