今天小编就为大家分享一篇关于易语言将指定内容转换成二维码的方法，小编觉得内容挺不错的，现在分享给大家，具有很好的参考价值，需要的朋友一起跟随小编来看看吧
正文
易语言制作二维码生成器
DLL命令表
|
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
|
.版本 2.DLL命令 二维码_外形设置, , "QRCodeWin32.dll", "QRAppearance" .参数 模块尺寸, 双精度小数型 .参数 方向, 整数型 .参数 边框, 整数型.DLL命令 二维码_编码参数, , "QRCodeWin32.dll", "QRConfigure" .参数 版本, 整数型 .参数 纠错级别, 整数型 .参数 掩膜, 整数型.DLL命令 二维码_默认设置, , "QRCodeWin32.dll", "QRSetDefault".DLL命令 二维码_设置文本信息, , "QRCodeWin32.dll", "QRSetMessage" .参数 文本, 文本型.DLL命令 二维码_获取模块数, , "QRCodeWin32.dll", "QRGetActualRC" .参数 行, 整数型, 传址 .参数 列, 整数型, 传址.DLL命令 二维码_设置图像分辨率, , "QRCodeWin32.dll", "QRSetSize" .参数 宽度, 整数型 .参数 高度, 整数型.DLL命令 二维码_保存到bmp文件, 整数型, "QRCodeWin32.dll", "QRSaveAsBMP" .参数 文件名, 文本型.DLL命令 二维码_复制wmf图片到剪辑板, 整数型, "QRCodeWin32.dll", "QRCopyToClipboard".DLL命令 二维码_设置前景色, , "QRCodeWin32.dll", "QRSetBackColor" .参数 红, 整数型 .参数 绿, 整数型 .参数 蓝, 整数型.DLL命令 二维码_设置背景色, , "QRCodeWin32.dll", "QRSetBarColor" .参数 红, 整数型 .参数 绿, 整数型 .参数 蓝, 整数型 |
生成二维码
|
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
|
.版本 2.支持库 BmpOperate.程序集 程序集1.子程序 _启动子程序, 整数型, , 请在本子程序中放置易模块初始化代码_临时子程序 ()返回 (0).子程序 _临时子程序载入 (窗口1, , 假).子程序 快速生成二维码, 字节集, 公开, 返回生成的二维码图像数据.参数 原始文本, 文本型, , 超过120字符的只取前120字符，如果有汉字，可能出现乱码.参数 条码版本, 整数型, 可空, 取值0～40，留空时为设置为0自动.参数 纠错级别, 整数型, 可空, 由低到高0～4，留空时为设置为0低.参数 点阵大小, 双精度小数型, 可空, 取值0.02～0.26，留空设置为0.02.局部变量 图片, 字节集.局部变量 位图, 位图.局部变量 目标位图, 位图.局部变量 I, 整数型.局部变量 顶点X, 整数型.局部变量 顶点Y, 整数型.局部变量 宽高, 整数型.如果真 (取文本长度 (原始文本) ＞ 120) 原始文本 ＝ 取文本左边 (原始文本, 120).如果真结束.如果真 (是否为空 (条码版本)) 条码版本 ＝ 0.如果真结束.如果真 (条码版本 ＜ 0) 条码版本 ＝ 0.如果真结束.如果真 (条码版本 ＞ 40) 条码版本 ＝ 40.如果真结束.如果真 (是否为空 (纠错级别)) 纠错级别 ＝ 0.如果真结束.如果真 (纠错级别 ＜ 0) 纠错级别 ＝ 0.如果真结束.如果真 (纠错级别 ＞ 4) 纠错级别 ＝ 4.如果真结束.如果真 (是否为空 (点阵大小)) 点阵大小 ＝ 0.02.如果真结束.如果真 (点阵大小 ＜ 0.02) 点阵大小 ＝ 0.02.如果真结束.如果真 (点阵大小 ＞ 0.26) 点阵大小 ＝ 0.26.如果真结束二维码_设置文本信息 (原始文本)二维码_设置前景色 (255, 255, 255)二维码_设置背景色 (0, 0, 0)二维码_编码参数 (条码版本, 纠错级别, 5)二维码_外形设置 (点阵大小, 1, 0)二维码_设置图像分辨率 (400, 400)二维码_保存到bmp文件 (取运行目录 () ＋ “\二维码图片.bmp”)位图.创建 (400, 400, 1, 0)位图.载入文件 (取运行目录 () ＋ “\二维码图片.bmp”)取位图图象顶点 (位图, 顶点X, 顶点Y).计次循环首 (399, I) .如果真 (位图.取某点颜色 (顶点X ＋ I － 1, 顶点Y) ＝ 0 且 位图.取某点颜色 (顶点X, 顶点Y ＋ I － 1) ＝ 0) 宽高 ＝ I .如果真结束 .如果真 (顶点X ＋ I － 1 ≥ 399 或 顶点Y ＋ I － 1 ≥ 399) 跳出循环 () .如果真结束.计次循环尾 ()目标位图.创建 (宽高, 宽高, 1, 0)位图.复制到 (顶点X, 顶点Y, 宽高, 宽高, 目标位图, 0, 0, )图片 ＝ 目标位图.取位图数据 ()删除文件 (取运行目录 () ＋ “\二维码图片.bmp”)返回 (图片).子程序 取位图图象顶点.参数 位图, 位图.参数 顶点X, 整数型, 参考.参数 顶点Y, 整数型, 参考.局部变量 X, 整数型.局部变量 Y, 整数型.计次循环首 (400, X) .计次循环首 (400, Y) .如果真 (位图.取某点颜色 (X － 1, Y － 1) ＝ 0) 顶点X ＝ X － 1 顶点Y ＝ Y － 1 返回 () .如果真结束 .计次循环尾 ().计次循环尾 () |
转换二维码启动窗口
|
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
|
.版本 2.程序集 窗口程序集1.子程序 _生成按钮_被单击二维码图片框.图片 ＝ 快速生成二维码 (要转换内容编辑框.内容, 到数值 (组合框_版本.现行选中项), 到数值 (组合框_纠错.现行选中项), 到数值 (组合框_点阵.内容)).子程序 _窗口1_创建完毕组合框_版本赋值 ()_生成按钮_被单击 ().子程序 组合框_版本赋值.局部变量 n, 整数型.局部变量 像素, 整数型.局部变量 文本, 文本型.局部变量 数值, 双精度小数型数值 ＝ 0.02像素 ＝ 21组合框_版本.加入项目 (“自动”, ).计次循环首 (40, n) 文本 ＝ 到文本 (像素) 组合框_版本.加入项目 (“版本_” ＋ 到文本 (n) ＋ “ ” ＋ 文本 ＋ “×” ＋ 文本, ) 像素 ＝ 像素 ＋ 4.计次循环尾 ().计次循环首 (24, n) 数值 ＝ 数值 ＋ 0.01 组合框_点阵.加入项目 (到文本 (数值), ).计次循环尾 () |
运行结果：
总结
以上就是这篇文章的全部内容了，希望本文的内容对大家的学习或者工作具有一定的参考学习价值，谢谢大家对米米素材网的支持。如果你想了解更多相关内容请查看下面相关链接
发表评论