函数名:QREncode(cStr[,nWidth])
缩写:qren
将字符串生成二维码,返回一个BMP文件流,可以用strtofile()保存成图片
返回值:
字符型,BMP图片的字符串
参数:
cStr: 字符型,要处理的字符串
[,nWidth]:整型,可选,默认200,生成二维码图片的像素宽度,
示例代码
Set Library To myFll
StrToFile(QREncode("http://www.baidu.com",400),"bd.bmp") &&生成 一个400*400像素的百度连接二维码图片
Set Library To
上面是MYFLL.FLL帮助里的相关内容
下面是我的用法
xfilename = sys(5)+sys(2003)+'\'+你的文件名
&& 带全路径,可以不带扩展名
xchr = QREncode(qrcode,200)
&& qrcode 是要生成二维码的字符串
strtofile(xchr,xfilename)
* 在FORM中需要有个image控件
thisform.image1.picture = xfilename
[此贴子已经被作者于2021-8-28 15:15编辑过]