pb生成二维码打印实例

单据打印二维码的功能, 用法如下: 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 方法一适用于数据窗口中的条码值不变的情况，例如执行单号 方法二适用于数据窗口中的条码值有变化的情况，例如组号.计划单号等