Foxtable(狐表)用户栏目专家坐堂 → [求助]关于BarCode生成的文本宽度


  共有2239人关注过本帖树形打印复制链接

主题:[求助]关于BarCode生成的文本宽度

帅哥哟,离线,有人找我吗?
jspta
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:七尾狐 帖子:1731 积分:11255 威望:0 精华:0 注册:2011/12/15 22:06:00
[求助]关于BarCode生成的文本宽度  发帖心情 Post By:2016/6/13 10:54:00 [只看该作者]

barcode生成的文本宽度不能超过下方barcode的长度,这个要如何解决那?
现在想实现,Text这个属性生成的文字长度大于下方barcode长度,以便使条码在打印的时候比较短文字比较大。
这个如何解决?

 回到顶部
帅哥哟,离线,有人找我吗?
大红袍
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2016/6/13 11:01:00 [只看该作者]

 想怎么调整都可以,宽度、间距等。参考

 

http://www.foxtable.com/help/topics/2079.htm

 


 回到顶部
帅哥哟,离线,有人找我吗?
jspta
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:七尾狐 帖子:1731 积分:11255 威望:0 精华:0 注册:2011/12/15 22:06:00
  发帖心情 Post By:2016/6/13 11:05:00 [只看该作者]

以下是引用大红袍在2016/6/13 11:01:00的发言:

 想怎么调整都可以,宽度、间距等。参考

 

http://www.foxtable.com/help/topics/2079.htm

 

这些属性解决不了这个问题。

你可以试试,Text每行最长显示字符不能大于Barcode长度。现在我想突破这个限制。


 回到顶部
帅哥哟,离线,有人找我吗?
大红袍
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2016/6/13 11:24:00 [只看该作者]

 方法一:条码不生成文字,然后把文字和条码合并成一个图片。

 

 方法二:文字肯定不能超过条码宽度的,如果不够显示,你可以调整条码的宽度拉长条码。


 回到顶部
帅哥哟,离线,有人找我吗?
jspta
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:七尾狐 帖子:1731 积分:11255 威望:0 精华:0 注册:2011/12/15 22:06:00
  发帖心情 Post By:2016/6/13 11:31:00 [只看该作者]

如何用代码合并成一个图片?
条码不能太长,否则不容易进行扫描。

 回到顶部
帅哥哟,离线,有人找我吗?
大红袍
  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2016/6/13 11:32:00 [只看该作者]


 回到顶部
帅哥哟,离线,有人找我吗?
jspta
  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:七尾狐 帖子:1731 积分:11255 威望:0 精华:0 注册:2011/12/15 22:06:00
  发帖心情 Post By:2016/6/13 12:15:00 [只看该作者]

保存的图片的时候,背景是黑色如何解决?

 回到顶部
帅哥哟,离线,有人找我吗?
大红袍
  8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2016/6/13 12:18:00 [只看该作者]

你代码怎么写?没必要用到 Painter1 的。如果你用画图板,可以这样写设置背景

 

控件.Graphics.clear(Color.White)


 回到顶部
帅哥哟,离线,有人找我吗?
大红袍
  9楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2016/6/13 12:22:00 [只看该作者]

直接这样写

 

Dim bmp As new Bitmap(100, 50)
Dim g = Graphics.FromImage(bmp)

 

Dim fnt As New Font("宋体",20)
Dim msg As String = "测试"
g.DrawString(msg,fnt,Brushes.Red,0,0)

 

bmp.save("d:\test2.jpg")


 回到顶部