当前位置: 代码迷 >> PB >> datawindow打印时奇怪的有关问题,同一次打印宽度变宽
  详细解决方案

datawindow打印时奇怪的有关问题,同一次打印宽度变宽

热度:39   发布时间:2016-04-29 06:54:59.0
datawindow打印时奇怪的问题,同一次打印宽度变宽
客户反映某一报表打印时,点一次打印按钮,当打印内容多时,个别时候会出现断行, 出错处的地方表格突然放大了似的,而且预览中也是正常的,打印的少的时候正常。
打印按钮主要代码如下:
Choose Case lb //是否连续打印
Case 0 //正常打印
dw.Object.DataWindow.Printer =str_printername
dw.Print()
Case 1 //连续打印
job = PrintOpen('his打印',false)
PrintSend(job,CharA(27) + CharA(67) + CharA(1)) //以行为单位设定页长
PrintSend(job,CharA(27) + CharA(85) + CharA(48)) //解除粗体字体
PrintSend(job,CharA(28) + CharA(120) + CharA(1)) //选择英文字体打印品质
PrintDataWindow(job,dw)
PrintClose(job)
End Choose
附打印出来效果图:
datawindw 打印

------解决方案--------------------
有这事?是同他DW打印出来的吗?
------解决方案--------------------
PrintSend(job,CharA(27) + CharA(67) + CharA(1)) //以行为单位设定页长
PrintSend(job,CharA(27) + CharA(85) + CharA(48)) //解除粗体字体
PrintSend(job,CharA(28) + CharA(120) + CharA(1)) //选择英文字体打印品质
估计是你连续打印的那段代码上的问题吧
打印驱动没问题吧?
  相关解决方案