SET PROCEDURE TO LOCFILE("FoxBarcodeQR.prg") ADDITIVE

*--- Create FoxBarcodeQR object and QR Code barcode image<
LOCAL loFbc, lcQRImage
loFbc = CREATEOBJECT("FoxBarcodeQR")
lofbc.ctemppath = "D:\test\"
lofbc.ldeletetempfiles = .F.  &&注意，这里如果是.T.，会删除目录下的所有文件！！！
lcQRImage = loFbc.QRBarcodeImage("电子化学项目：23233，合同号：88888888",,2,2)

详见：https://

[此贴子已经被作者于2019-8-1 15:14编辑过]

我是应用在合同、订单、发票凭证中的，原来使用的是条码，二维码比较容易识别，故改成二维码！