用 Visual foxpro 编写的程序中,打印的报表总有些问题?

Question

在打印报表时,在表单上点击了打印按钮之后,报表也打印出来了,但表单上显示的内容和报表的内容重叠在了一起.好像是表单更新不完整还是怎么回事?

Answer 1

首先你的报表设计是对的，而表单上显示的内容和报表的内容重叠在了一起，是这种情况吗？如果是，简单有效的方法是，隐蔽窗体，显示报表，打印完后再显示窗体，如：
thisform.hide
report form .\txt\frxsdl35.frx Environment dsetup preview
thisform.show
以下是本人在《建筑机具租赁结算管理系统》中部分源码（这段编码是在窗体的Command单击事件中的，其中this.value=5、6、9、10、13时，就用到调用报表）：

do case
case this.value=1 &&设定冬停有关系数
do form .\txt\frmsdl31
case this.value=2 &&自动结算租赁费
do form .\txt\frmsdl32
do form .\txt\frmsdl31
do sdl32 in .\abc
do form .\txt\frmsdl33
case this.value=3 &&租赁结算的显示
do form .\txt\frmsdl33
case this.value=4 &&假定日期计算租赁费
DO FORM .\txt\frmsdl34
do form .\txt\frmsdl33
case this.value=5 &&租赁结算的模拟显示
thisform.hide
report form .\txt\frxsdl35.frx Environment pdsetup preview
thisform.show
case this.value=6 &&租赁结算的打印
thisform.hide
report form .\txt\frxsdl35.frx Environment pdsetup to print prompt noconsole
thisform.show
case this.value=7 &&自动生成损坏价格
do sdl37 in .\abc
do form .\txt\frmsdl37
case this.value=8 &&损坏价格的显示
do form .\txt\frmsdl37
case this.value=9 &&损坏价格的模拟显示
thisform.hide
report form .\txt\frxsdl38.frx Environment pdsetup preview
thisform.show
case this.value=10 &&损坏价格的打印
thisform.hide
report form .\txt\frxsdl38.frx Environment pdsetup to print prompt noconsole
thisform.show
case this.value=11 &&丢失价格自动生成
do sdl311 in .\abc
do FORM .\txt\frmsdl311.scx
do sdl311_1 in .\abc
do FORM .\txt\frmsdl312.scx
case this.value=12 &&丢失价格的显示
do FORM .\txt\frmsdl312.scx
case this.value=13 &&丢失价格的模拟显示
thisform.hide
report form .\txt\frxsdl313.frx Environment pdsetup preview
thisform.show
endcase
----------------------
------------------------
希望能给你解决问题
-----------------------------------------------------

Answer 2

报表可能不是用报表生成器做的，是原来老式的用？生成的吧。

改为用报表生成器生成报表就不存在这个问题了。

Answer 3

长期用vfp8.0，9.0刚刚开始用
从来没有发现这样的问题
顶 凤凰山游子 - 高级魔法师 七级

个人认为这个原因是正确的