说三道四技术文摘-感悟人生的经典句子
说三道四 > 文档快照

在打印或打印预览前如何获取报表页数-Delphi资料

HTML文档下载 WORD文档下载 PDF文档下载
在打印或打印预览前如何获取报表页数-Delphi资料

我们有时需要在打印前获取报表的打印页数

比如我们需要在页眉或页脚中打印“共 xx 页 第 xx 页”,那如何实现呢? QuickRep生成Report之前,我们是无法得知报表页数的,而QuickReport是在打印或打印预览时才生成报表

换言之我们只有在 打印或打印预览前先将报表生成一次才能获取打印页数.生成报表的方法是 Prepare。参考以下的例子:

...

var nPageCount:integer;

begin

{...}

QuickRep1.Prepare;

nPageCount:=QuickRep1.QRPrinter.PageCount;

QuickRep1.QRPrinter.Free;

QuickRep1.QRPrinter:=nil;

{在此修改QuickRep1,实现在页眉或页脚中打印“共 xx 页 第 xx 页” ... }

QuickRep1.PreView;

{...}

End;

备案号:鲁ICP备13029499号-2 说三道四 www.s3d4.cn 说三道四技术文摘