请问怎么得到QReport的打印页数?(50分)

  • 主题发起人 主题发起人 Clark-Kidd
  • 开始时间 开始时间
C

Clark-Kidd

Unregistered / Unconfirmed
GUEST, unregistred user!
如体,谢谢
 
用 QRExpr1 Expression 如:QRExpr1.Expression = '第 ' + PAGENUMBER + ' 页'
 
以上方法只是得到当前页是第几页而己。
要得到总共多少页,可以用recordcount除以每一页的行数。
 
用FastReport吧,它自带函数,可以直接取出当前和总页数。
 
首先执行一下报表打印读取当前页(即最后一页)页码,也就是你所说的总共页码数。
 
procedure pagecount
var npagecount:integer;
begin
QuickRep1.Prepare;
npagecount:=QuickRep1.QRPrinter.PageCount;
******
QuickRep1.Preview;
end;
 
QRSysData 的 DATA = qrsPageNumber
 
接受答案了.
 
后退
顶部