以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]如何高速打印？  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=144919)
--  作者：zto001
--  发布时间：2020/1/2 21:26:00
--  [求助]如何高速打印？

Dim doc As New PrintDoc \'定义一个报表

doc.PageSetting.Width =74 \'纸张宽度为100毫米
doc.PageSetting.Height =129 \'纸张高度为120毫米

Dim rt As New prt.RenderTable() \'定义一个表格对象
Doc.PageSetting.LeftMargin = 1 \'设置左边距
Doc.PageSetting.RightMargin = 1 \'设置右边距
Doc.PageSetting.TopMargin = 2 \'设置上边距
Doc.PageSetting.BottomMargin = 1 \'设置下边距
rt.Width = "Parent.Width" \'对象宽度等于页面宽度
rt.Height = "Parent.Height" \'对象高度等于页面高度
\'指定行数?列数?列宽?行高
rt.Rows.Count = 10 \'设置总行数
rt.Cols.Count = 4 \'设置总列数
.......

\'设置表格样式
rt.CellStyle.Spacing.All = 1 \'单元格内容缩进1毫米
rt.Style.GridLines.All = New prt.Linedef \'设置网格线
rt.Style.GridLines.All = new Prt.LineDef(Color.RosyBrown) \'设置网格颜色
rt.Style.TextAlignVert =  prt.AlignVertEnum.Top \'内容靠上对齐
\'\'\'下面很简单,指定每一个单元格的内容
rt.Cells(0,1).Style.BackColor = Color.Black
Dim rx As New prt.RenderText \'定义一个文本对象
rx.Text = 打印(2) \' 打印(20)  \'退件标识
rx.Style.Font = New Font("微软雅黑", 16, FontStyle.Bold)
rx.Style.TextColor = Color.white
......
Dim rg As New prt.RenderGraphics
Dim Bar As New BarCodeBuilder
Bar.Symbology = Barpro.Symbology.Code128
bar.Code = 当前行("运单编号")    \'条形码
rg = new prt.RenderGraphics
bar.DrawOnCanvas(rg.Graphics,0,0,1)
rt.Cells(2,0).RenderObject = rg  \'将单元格内容设置为图片对象rm
.......

Dim rt0 As prt.RenderText \'定义一个文本对象
rt0 = New prt.RenderText \'设置文本对象的内容
.......
rt0.Style.TextColor = Color.DarkSlateGray \'文本颜色为灰色
Doc.WaterMark = rt0 \'作为水印使用

Doc.PrinterName = Args(1)
Doc.Print() \'预览报表


我需要动态生成打印内容，需要如何才能高速打印？》这样打印太慢了
--  作者：zto001
--  发布时间：2020/1/2 21:43:00
--  
比如菜鸟组件拼多多组件那样快速打印，或者有些系统内置的打印一样很快的，一秒能打几单的那种
--  作者：有点蓝
--  发布时间：2020/1/3 8:38:00
--  
看看这个：http://foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=144848&skin=0
--  作者：zto001
--  发布时间：2020/1/3 17:05:00
--  
那不还是这个代码。至于调打印速度的，没有这东西。
--  作者：有点蓝
--  发布时间：2020/1/3 17:10:00
--  
您可以优化一下代码，看能不能提高代码的执行速度。没有办法调整打印机的打印速度
--  作者：zto001
--  发布时间：2020/1/3 20:35:00
--  
有没有调用第三方打印插件打印的？我看他们都是调用菜鸟组件，拼多多组件的。速度很快
--  作者：有点蓝
--  发布时间：2020/1/3 20:43:00
--  
这个我就不清楚了。请自行百度