- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- [求助]如何把窗口里条码控件按其参数打印出来？ (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=143782)
-- 发布时间：2019/12/4 12:06:00
-- [求助]如何把窗口里条码控件按其参数打印出来？
一个窗体。上面有一个BarCode1控件。通过控件参数对其进行一些设置比如长高等等，并在窗体显示出来了。
现在需要按照设置的参数打印出来。如何实现？看帮助里不知道如何继承原来条码的参数。程序见下图。谢谢
此主题相关图片如下：微信图片_20191204115904.png
-- 发布时间：2019/12/4 13:40:00
--
参考：http://www.foxtable.com/webhelp/topics/2092.htm
-- 发布时间：2019/12/4 14:00:00
--
这段教材里面说的是把条码形成图片，而不是打印出来。
-- 发布时间：2019/12/4 14:13:00
--
是让您看怎么获取设置条码的参数，不是让您抄代码
-- 发布时间：2019/12/4 15:19:00
--
Dim doc As New PrintDoc
Dim img As prt.RenderImage
Dim Bar As New BarCodeBuilder
Bar.Symbology = Barpro.Symbology.Code39
Bar.BarRatio = 0.3
Bar.BarHeight = 8
Doc.Stacking = prt.StackingRulesEnum.InlineLeftToRight
For Each r As Row In Tables("表A").Rows
bar.Code = r("条码")
img = new prt.RenderImage
img.Image = bar.GetImage
Doc.Body.Children.Add(img)
Next
Doc.Preview()
这是一段打印条码的代码M。在窗口里的BarCode1控件通过设置显示出条码。现在想通过打印程序M，打印出和BarCode1里参数一样的条码。比如说明字体的大小，条码高度等等
当然也是可以在代码M里设置。好像在这里设置有些参数设置的方法没有找到。比如说明字体大小，文本字体的大小等等。既然没找到就想先把BarCode1参数设置好，然后把设置好的参数转到代码M里。
不知道说清楚没？
-- 发布时间：2019/12/4 15:29:00
--
在2楼的那个窗口右边属性区里做各种参数设置，就可以在查看代码按钮看到这个参数设置的代码是怎么用的啊，再参考把参数设置的代码搬到自己的代码里