Recent

Author Topic: Problem printing totals on an invoice  (Read 356 times)

critter

  • New Member
  • *
  • Posts: 18
Problem printing totals on an invoice
« on: May 11, 2020, 05:53:52 pm »
Hello friends, I would need some help and give me ideas on how to correct the problem. I am porting to delphi an application I made a long time ago and in printing the invoice with fastreport I used the following procedure to position the invoice summary before the footer, but it seems that lazreport does not have the FreeSpace variable. Could you tell me how to calculate the value of FreeSpace? Thank you.

Code: Pascal  [Select][+][-]
  1. procedure MasterDataTotalBandBeforePrint(Sender: TfrxComponent);
  2. begin
  3.   // See if there's room for the band between the bottom of the last
  4.   // band (MasterDataDetail) and the footer and page footer.
  5.  
  6.   if Engine.FreeSpace > MasterDataTotalBand.Height + FooterBand1.Height +
  7.                         PageFooter1.Height + 5 then
  8.     Engine.CurY := Engine.CurY + 5;
  9. end;
  10.  

 

TinyPortal © 2005-2018