浅谈VFP报表打印的问题

时间：2022-02-21 18:32:51 好文我要投稿

浅谈有关VFP报表打印的问题

　　1．如何打印指定的页

　　通常情况下，VFP默认打印当前报表的全部内容，这给使用者带来不便，那么如何实现让系统打印指定范围的内容呢？其实很简单，只需在报表打印语句中加上关于打印范围限制的关键字短语RANGE即可。如：打印报表XXX.FRX的第2至第5页，可使用如下命令

　　REPORT FORM XXX.FRX RANGE 2,5 TO PRINTER

　　为增强该语句功能的灵活性，可引入表示欲打印范围的两个参数x和y，分别代表打印的起始和终止页码，将打印命令改写为

　　REPORT FORM XXX.FRX RANGE x,y TO PRINTER

　　2．如何计算总页数，以实现每页均打印“第x页共y页”字样

　　VFP系统变量 _PAGENO 可提供当前的打印页号，但却没有能返回总页数的系统变量，若要实现在报表的`每一页均打印“第x页共y页”字样，打印前可根据细节区所打印的记录条数，进行计算，然后再打印，实现方法如下：

　　PUBLIC mPAGE

　　SELE XXX && XXX为欲打印报表的数据源

　　XX=35 && XX为每页报表细节区所打印的记录条数

　　mPAGE=IIF(MOD(RECC(),XX)=0,RECC()/XX,INT(RECC()/XX)+1) &&mPAGE为报表总页数

　　在报表页脚注（或其他合适位置）添加如下信息即可：

　　"第 "+allt(str(_pageno))+" 页共 "+allt(str(mPAGE))+" 页"

　　3．如何使计算机打印纸张类型适合于所设计报表

　　报表在设计时能够正常打印，可是安装到其他计算机或重装系统后，就会出现“XXX 带区太大不能放入页中”等提示，而且无法正常退出（尤其是对报表设计时采用自定义纸张的程序），这是为什么呢？现作如下解释：

　　我们用报表设计器设计的报表打印程序，保存退出后，磁盘上就会出现 .FRX和.FRT文件，我们的所有设计均保存在这两个文件中。在VFP中 .FRX相当于.DBF表，.FRT相当于.FPT备注型文件，我们用USE XXX.FRX可以象打开.DBF文件一样打开.FRX文件，在.FRX文件中有个Expr备注型字段名，在这个字段名中有如下与打印设置相关的内容（不同设置内容稍有差别）：

　　DRIVER=winspool

　　DEVICE=Epson LQ-1600K

　　OUTPUT=LPT1:

　　ORIENTATION=0

　　PAPERSIZE=256

　　PAPERLENGTH=2800

　　PAPERWIDTH=2400

　　DEFAULTSOURCE=8

　　PRINTQUALITY=180

　　YRESOLUTION=180

　　TTOPTION=1

　　其中：