怎樣直接獲取QuickReport報表的總頁次(50分)

  • 主题发起人 主题发起人 lzm
  • 开始时间 开始时间
L

lzm

Unregistered / Unconfirmed
GUEST, unregistred user!
怎樣直接獲取QuickReport報表的總頁次,不能用數據集條數/每頁條數.
 
好像在quickrep 中没有这样的函数。
看一下你预览的最后一页的页码呀。
 
quickreport只有在全部预览完毕后才能计算出总页数
 
要得到报表的总页数,先声明一个变量,报表准备好后就可以计算出总页数。
程序示例如下:
procedure 过程名
var npagecount:integer;
begin
QuickRep1.Prepare;
npagecount:=QuickRep1.QRPrinter.PageCount;
//(在报表中可添加标签:"共npagecount页")
QuickRep1.Preview;
end;
 
QuickRep.LastPage不就是总页数吗。
 
//QuickRep.LastPage不就是总页数吗。
必須得用Prepare動作﹐這樣效率太差勁了。
不過我已解決﹐多謝各位﹗
 
你是如何解决的,让大家也参考一下!
 
多人接受答案了。
 

Similar threads

D
回复
0
查看
911
DelphiTeacher的专栏
D
D
回复
0
查看
868
DelphiTeacher的专栏
D
D
回复
0
查看
840
DelphiTeacher的专栏
D
后退
顶部