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 组合框_点阵.加入项目 (到文本 (数值), ) .计次循环尾 () |
运行结果:
总结
以上就是这篇文章的全部内容了,希望本文的内容对大家的学习或者工作具有一定的参考学习价值,谢谢大家对服务器之家的支持。如果你想了解更多相关内容请查看下面相关链接