FastReport中获取报表页数

Jackhe 2004-12-27 05:20:47
如何在FastReport中获取一个报表的总页数,并显示在另一个Form中的Label上

谢谢
...全文
543 6 打赏 收藏 转发到动态 举报
AI 作业
写回复
用AI写文章
6 条回复
切换为时间正序
请发表友善的回复…
发表回复
Rail100 2004-12-27
  • 打赏
  • 举报
回复
苯办法,在frReport1.OnBeginPage事件里放个变量
var
PageCount: Integer;
procedure frReport1BeginPage(pgNo: Integer);
begin
PageCount := pgNo;
end;

完成打印后再把PageCount拿来用就是了。
yeliming 2004-12-27
  • 打赏
  • 举报
回复
改它的源码,给TfrReport增加个属性,叫做TotalPages。
adong2838 2004-12-27
  • 打赏
  • 举报
回复
最笨方法就是在顯示紀錄之前,計算好每頁的行數,然後用RecordCount去除就可以了 ^_^
Jackhe 2004-12-27
  • 打赏
  • 举报
回复
我就是希望在ShowReport的时候把页脚上的[TotalPages]的值读取出来,
并显示在另一个Form的一个Label上
dejiang 2004-12-27
  • 打赏
  • 举报
回复
页脚上放一个MEMO,内容为[PAGE#]
可恶的狼 2004-12-27
  • 打赏
  • 举报
回复
添加一个MEMO控件,然后设置一个totalPages 就可以了

2,507

社区成员

发帖
与我相关
我的任务
社区描述
Delphi 数据库相关
社区管理员
  • 数据库相关社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧