编辑框只能输入汉字例程

.版本 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).如果真结束

运行结果：

总结

以上就是这篇文章的全部内容了，希望本文的内容对大家的学习或者工作具有一定的参考学习价值，谢谢大家对的支持。如果你想了解更多相关内容请查看下面相关链接