编辑框只能输入汉字例程
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
|
.版本 2 .支持库 RegEx .支持库 spec .程序集 启动窗口程序集 .程序集变量 过滤后文本, 文本型 .子程序 __启动窗口_创建完毕 默认窗口 = SetWindowLongA (编辑框1.取窗口句柄 (), -4, &处理) .子程序 处理, 整数型, , 不要修改该子程序的返回值及参数的类型! .参数 句柄, 整数型 .参数 消息, 整数型 .参数 参数1, 整数型 .参数 参数2, 整数型 .局部变量 文本字节集, 字节集 .局部变量 i, 整数型 .局部变量 代码, 字节型, , "0" .局部变量 正则, 正则表达式 .局部变量 结果, 搜索结果, , "0" .如果真 (消息 = 770) 文本字节集 = 到字节集 (取剪辑板文本 ()) 过滤后文本 = “” i = 1 .判断循环首 (i < 取字节集长度 (文本字节集)) .判断开始 (到数值 (文本字节集 [i]) ≥ 176 且 到数值 (文本字节集 [i + 1]) ≥ 161) 重定义数组 (代码, 假, 0) 加入成员 (代码, 文本字节集 [i]) 加入成员 (代码, 文本字节集 [i + 1]) 过滤后文本 = 过滤后文本 + 到文本 (到字节集 (代码)) i = i + 2 到循环尾 () .判断 (到数值 (文本字节集 [i]) > 127) i = i + 2 .判断 (取整 (到数值 (文本字节集 [i])) = 13) 调试输出 (到数值 (文本字节集 [i])) 重定义数组 (代码, 假, 0) 加入成员 (代码, 13) 加入成员 (代码, 10) 过滤后文本 = 过滤后文本 + 到文本 (到字节集 (代码)) i = i + 1 .默认 i = i + 1 .判断结束 .判断循环尾 () 编辑框1.加入文本 (过滤后文本) 返回 (1) .如果真结束 返回 (CallWindowProcA (默认窗口, 句柄, 消息, 参数1, 参数2)) .子程序 _编辑框1_字符输入, 整数型 .参数 字符代码, 整数型 .如果真 (字符代码 = 13 或 字符代码 = 8) 返回 (字符代码) .如果真结束 .如果真 (字符代码 < 176) 返回 (0) .如果真结束 |
运行结果:
总结
以上就是这篇文章的全部内容了,希望本文的内容对大家的学习或者工作具有一定的参考学习价值,谢谢大家对服务器之家的支持。如果你想了解更多相关内容请查看下面相关链接