PageFooter Question

Comments

• GRFrones

  January 2007 edited January 2007

  Two ways I could think to do this:
  - Use a ReportSummary in place of PageFooter;
  - Use a script on the OnBeforePrint of the PageFooter to check if this is the last page. Something like that:

  Begin
      PageFooter1.Visible := <Page#> = <TotalPages#>
  End;
  

  
  Best Regards.
• sparkz

  January 2007 edited 2:24PM

  Thanks. I think the second will work
  
  Doesn't seem to be many sightings of the FR team on the forum since New Year. They must have one big hang over!
• GRFrones

  January 2007 edited January 2007

  Just for curiosity: Why doesn't the ReportSummary works on this case?
  

  wrote:

  Doesn't seem to be many sightings of the FR team on the forum since New Year. They must have one big hang over!

  Apparently, there are only few ones that take care of the forum. I can only remember 3 names, and one of them, is AlexTZ, who is also the main developer. So that he may not have much time to spend here.
  
  However, they seem to post more frequently on the newsgroup. You should check it out.
  
  Regards.
• Mikael

  January 2007 edited 2:24PM

  I have the same problem. But I cannot use PageFooter because I use it for something else. So I try to use the ReportSummary band.
  
  But there is a big (for me at last) problem. The band is printed at next white space. I really need it to be printed at the bottom of the page!
  
  Any help appreciated!
  
  
• gordk St.Catherines On. Canada.

  January 2007 edited 2:24PM

  procedure ReportSummary1OnBeforePrint(Sender: TfrxComponent);
  begin
  if engine.freespace > reportsummary1.height then
  begin
  Engine.CurY := Engine.PageHeight -reportsummary1.height -pagefooter1.Height - 1;
  
  end;
  end;
  or if the band is stretchable
  procedure ReportSummary1OnAfterCalcHeight(Sender: TfrxComponent);
  
  begin
  Engine.CurY := Engine.PageHeight -reportsummary1.height -pagefooter1.Height - 1;
  end;
• jipo

  November 2010 edited 2:24PM

  gordk wrote: »

  procedure ReportSummary1OnBeforePrint(Sender: TfrxComponent);
  begin
  if engine.freespace > reportsummary1.height then
  begin
  Engine.CurY := Engine.PageHeight -reportsummary1.height -pagefooter1.Height - 1;
  
  end;
  end;
  or if the band is stretchable
  procedure ReportSummary1OnAfterCalcHeight(Sender: TfrxComponent);
  
  begin
  Engine.CurY := Engine.PageHeight -reportsummary1.height -pagefooter1.Height - 1;
  end;

  thanks man..it's work