FastReport中获取报表页数

Question

如何在FastReport中获取一个报表的总页数，并显示在另一个Form中的Label上谢谢

Answer 1

添加一个MEMO控件，然后设置一个totalPages 就可以了

Answer 2

页脚上放一个MEMO，内容为[PAGE#]

Answer 3

我就是希望在ShowReport的时候把页脚上的[TotalPages]的值读取出来，
并显示在另一个Form的一个Label上

Answer 4

最笨方法就是在顯示紀錄之前,計算好每頁的行數,然後用RecordCount去除就可以了 ^_^

Answer 5

改它的源码，给TfrReport增加个属性，叫做TotalPages。

Answer 6

苯办法，在frReport1.OnBeginPage事件里放个变量
var
  PageCount: Integer;
procedure frReport1BeginPage(pgNo: Integer);
begin
  PageCount := pgNo;
end;完成打印后再把PageCount拿来用就是了。