vfp 报表纸张问题,急急急

小菲1215 2005-06-08 12:03:48
为什么我在报表设计时使用了自定义的纸张大小,可我打出来的老是A4的张格格式呢,我连续进纸就是A4格式了,我在打印机里面也添加了我的报表纸张格式,可我一打打印,看张格格式又是默认的A4格式了,我的打纸代码
report from dy.frx to printf
...全文
211 7 打赏 收藏 转发到动态 举报
写回复
用AI写文章
7 条回复
切换为时间正序
请发表友善的回复…
发表回复
十豆三 2005-06-08
  • 打赏
  • 举报
回复
量一下你的纸张是这个(2300*1750)尺寸吗?
小菲1215 2005-06-08
  • 打赏
  • 举报
回复
我是用的REPORT FORM 报表 TO Printer Prompt 调出来的,可每次打印都在首选项里面我看了一下都是A4,我的纸是2300*1750 我用prompt  主要是方面可以选择打多少份
十豆三 2005-06-08
  • 打赏
  • 举报
回复
我在打印机里面也添加了我的报表纸张格式,

*----------

你的自定义纸张是多大。

或用以下代码打印时,选择一下你的自定义纸张试试。
REPORT FORM 报表 TO Printer Prompt

另外:默认打印机对吗
LAIYANGPJ 2005-06-08
  • 打赏
  • 举报
回复
设为首选试试
十豆三 2005-06-08
  • 打赏
  • 举报
回复
1、在WINXP下编译一下试试。

2、再换一个WINXP机子试试。

3、看看这个对你有没有帮助:

报表在设计时明明可以打印,可一安装到其他机器或重装系统后,就会出现
“XXX 带区太大不能放入页中”等提示,而且无法正常退出(尤其是对自定义纸张
大小的程序),这是为什么呢?
  我们用报表设计器设计的打印程序,保存退出后,磁盘上就会出现 .frx和.FRT
文件,我们的所有设计均保存在这两个文件中。在VFP中 .frx相当于.DBF表,.FRT
相当于.FPT备注型文件,我们用USE XXX.frx 可以象打开.DBF文件一样打开.frx文
件,在.frx文件中有个Expr备注型字段名,在这个字段名中有如下内容:其中()内是
我所加的译文
======================================================================
RIVER=winspool
DEVICE=Epson LQ-1600K
OUTPUT=LPT1:
ORIENTATION=0   
PAPERSIZE=256       (纸张大小)
PAPERLENGTH=1000     (纸张长度)
PAPERWIDTH=1600      (纸张宽度)
DEFAULTSOURCE=8     (默认来源)
PRINTQUALITY=180     (打印质量)
COLOR=2
YRESOLUTION=180
TTOPTION=1
======================================================================
从这个Expr备注型字段里可以看出:PAPERSIZE=256 这里的256表示是自定义纸张,
如果:
PAPERSIZE=9 为A4、11为A5 具体数据见VFP帮助的Printfo()一节, 而:
PAPERLENGTH=1000  (纸张长度)
PAPERWIDTH=1600   (纸张宽度)
则分别代表自定义纸张的长度和宽度。 之所以会出现上面提到的问题,是因为系统重
新安装打印机后,WIN系统一般默认的是A4打印纸,与我们设计时保存在.frx文件里的
纸张不符,因而造成这种情况。 那么如何避免出现这个问题呢?
  下面是一段检测纸张类型的代码,供您参考:
这段代码必须放在执行report form … 命令前。
use xxx.frx in 0 ALIAS mPrint    &&在空闲工作区以mPrint别名打开xxx.frx文件
x=atcline('PAPERSIZE',mPrint.Expr) &&取得PAPERSIZE在Expr字段中的行
sSIZE=subs(mline(mPrint.Expr,x),11) &&取得设计时保存的纸张类型
mSIZE=allt(str(Prtinfo(2)))     &&取得当前打印机默认的纸张类型
x=atcline('PAPERLENGTH',mPrint.Expr) &&取得纸张长度在Expr字段中的行
sLEN=subs(mline(mPrint.Expr,x),13)  &&取得纸张长度
x=atcline('PAPERWIDTH',mPrint.Expr) &&取得纸张宽度在Expr字段中的行
sWIDTH=subs(mline(mPrint.Expr,x),12) &&取得纸张宽度
use in 'mPrint'          &&关闭xxx.frx文件
if sSIZE=mSIZE          &&如果相符,则正常打印
 report form xxx.frx to printer
else
 Messagebox('请设定打印机纸张为自定义:长='+sLEN+',宽='+sWIDTH,0+48+0,'提示')
 report form xxx.frx to printer prompt &&打印前先打开打印机设置对话窗口
endi
小菲1215 2005-06-08
  • 打赏
  • 举报
回复
我用REPORT FORM 报表 TO Printer Prompt在打印机对话框选择了A4,可为什么第二次还是A4呢,不能强制性设为了自定义嘛,我用SYS(1037)设置了纸张的啊
小菲1215 2005-06-08
  • 打赏
  • 举报
回复
是的,现在主要是我按了打印后,在电脑上不是默认的自定义纸张格式(WINXP)电脑,可我在WIN2000电脑上就按了打印按钮后在张张输出格式里面默认的就是自定义了,怪得很,能不能在打印这前把打印机的纸张设为自定义,该怎么弄代码

2,727

社区成员

发帖
与我相关
我的任务
社区描述
VFP,是Microsoft公司推出的数据库开发软件,用它来开发数据库,既简单又方便。
社区管理员
  • VFP社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧