花落谁家，你作主！	盛大widget设计大赛英雄榜

请教打印：用针式打印机打印定长的单据，纸张长度是怎么设定的？

楼主bugforever（debug）2001-11-07 16:13:21 在 PowerBuilder / 基础类提问

是不是调用PrintSetup()来设定纸张大小这种方式来控制？
不知各位大侠是采用的什么方法，多谢赐教！问题点数：29、回复次数：9Top

1 楼xingjiaren（Sandy）回复于 2001-11-07 16:19:23 得分 0

printsend(job,"~h1B~h43~h**")
h**自己根据尺寸自己算Top

2 楼bugforever（debug）回复于 2001-11-07 16:28:28 得分 0

To:xingjiaren
我看到过一篇帖子，和你的方法差不多，也是用的PrintSend(),
不过照着它的做法，并不能控制打印纸张的长度，一旦打印，
整张纸都出来了，并没有在定长处停下来，想请教你具体的做法，
Thanks
帖子原文是这样的。
下面是具体的完成定制页长打印数据窗口的程序（定制页长为2.75英寸）：

long ll_job
dw_print.reset()
ll_job = printopen()
if ll_job = -1 then
messagebox(gs_title,"打印机未准备好")
return
end if
//定制行距1/8英寸
PrintSend(ll_job, CHAR(27)+CHAR(48))
//设定页长22行
PrintSend(ll_job, CHAR(27)+CHAR(67)+CHAR(22))
printdatawindow(ll_job,dw_print)
printclose(ll_job)
Top

3 楼xingjiaren（Sandy）回复于 2001-11-07 16:36:48 得分 10

我的程序章节如下：
long job
job=printopen()
if job = -1 then
MessageBox("Error in PrintOpen",job,StopSign!)
return
end if
printsend(job,"~h1B~h6A~220")
printsend(job,"~h1B~h6A~220")
printsend(job,"~h1B~h6A~210")
printsend(job,"~h1B~h43~h00")
printclose(job)
job=printopen()
printsend(job,"~h1B~h43~h18")
print(job,500,string(****),900)
。。。。。。。。。。
。。。。。。。。。。
printsend(job,"~h1B~h4A~220")
printsend(job,"~h1B~h4A~220")
printsend(job,"~h1B~h4A~210")
printsend(job,"~h1B~h43~h00")
printclose(job) Top

4 楼xingjiaren（Sandy）回复于 2001-11-07 16:37:59 得分 10

另：我寻到的东东
打印时能使纸回退，打印完之后能能让纸前进一些，
适合于打票据的单位
（注意使用printdatawindow函数，Datawindow中字体设置均无效）
long job,temp
job=printopen()
printsend(job,"~h1B~h6A~254")
printsend(job,"~h1B~h6A~100")
printsend(job,"~h1c~h78~h01")
printsend(job,"~h1B~h43~h01")
print(job,"")
temp=printdatawindow(job,dw_print) /*dw_print是要打印的数据窗口*/
printclose(job)
Job = PrintOpen()
printsend(job,"~h1B~h43~h13")

printclose(job)Top

5 楼946（情系会计）回复于 2001-11-07 16:42:23 得分 5

可不可以直接在打印机里自定义纸张，不一定非要在程序里设置吧。Top

6 楼bugforever（debug）回复于 2001-11-07 17:02:52 得分 0

尝试了一把，还是没有解决，暂时就用PrintSetup()由用户自己设吧，
Thanks all,还想看看有没有更多的解决方法，明早结帖子吧Top

7 楼klhls（人生百味）回复于 2001-11-07 17:09:07 得分 4

你可以试试用用户对象
Top

8 楼xingjiaren（Sandy）回复于 2001-11-07 17:14:44 得分 0

我客户用的发票套打程序就是如上所写（针对打印机为Epson系列）
不知你怎么试的呢？
Top

9 楼bugforever（debug）回复于 2001-11-07 22:16:06 得分 0

Thanks all!Top