PB调用 BarCode 打印条码问题

Wayne-XY 2020-12-19 12:31:57

使用PB12.6编写在数据窗口内填加了一个OLe控件，让其使用microsoft barcode ，我使用以下语句赋值
dw_9.Object.ole_1.Object.style = 7
dw_9.Object.ole_1.Object.forecolor(0)
dw_9.Object.ole_1.Object.Value(ls_sz1)
我在运行时设置好数据后生成，第一次可以正常生成，再去设置其它值时就一点反应都没有了。请问是什么原因

...全文

696 1 打赏收藏转发到动态举报

写回复

1 条回复

切换为时间正序

请发表友善的回复…

发表回复

cailinaaa 2020-12-21

打赏
举报

回复

dw_9.Object.ole_1.Object.Style = 7
dw_9.Object.ole_1.Object.Value = ls_sz1

PB调用barcodex控件打印条码案例源码，自己写的网上找不到的

pb生成条形码，可以方便的生成条形码，进行打印

pb9.0调用codesoft6.0生成的条码文件打印条码

单据打印二维码的功能, 用法如下: 1.复制附件中的那2个DLL到使用的文件夹下面。 qrdecode.dll qrencode.dll 2.导入对象 n_qrcode_prtobj.sru 3.调用： n_qrcode_prtobj luo_qrcode_prtobj luo_qrcode_prtobj = create n_qrcode_prtobj --gwts.ipnt.of_printset(ls_printobj,adw_print) luo_qrcode_prtobj.vf_set_barcode_bypb(dw_print) /*设置打印条码: 二维码*/ --gwts.ipnt.of_print(dw_print) destroy luo_qrcode_prtobj 4.调整数据窗口根据需要自行调整数据窗口, 方法一: 在数据窗口中加一图片 picture object, 名为: p_barcode, 在tag属性中填上条码列的 colname 例如条码值为：配药单号 execnote_num 在数据窗口 dw_zss2_printtpd 中数据源中增加 op_execnote.execnote_num, 对应的数据窗口列名改为 execnote_num, 再在数据窗口中增加一 picture object, name 属性中填入 p_barcode, tag 属性中填入 execnote_num. 方法二: 在数据窗口中的sql中加一字段 , 名为: p_filename, 计算表达式为: ' ' as p_filename --共100个空格, 再在数据窗口中加一计算列，名为: p_bitmapfilename, 计算表达式为: bitmap(p_filename), tag属性中填上条码列的 colname 方法一适用于数据窗口中的条码值不变的情况，例如执行单号方法二适用于数据窗口中的条码值有变化的情况，例如组号.计划单号等

立像条码打印机开发API1

1,079

社区成员

66,439

社区内容

发帖

与我相关

我的任务

社区管理员

加入社区

近7日
近30日
至今

加载中

查看更多榜单

社区公告

暂无公告

试试用AI创作助手写篇文章吧

+ 用AI写文章