易语言限制编辑框只能输入中文的方法

编辑框只能输入汉字例程

公司主营业务:成都做网站、网站制作、移动网站开发等业务。帮助企业客户真正实现互联网宣传,提高企业的竞争能力。成都创新互联公司是一支青春激扬、勤奋敬业、活力青春激扬、勤奋敬业、活力澎湃、和谐高效的团队。公司秉承以“开放、自由、严谨、自律”为核心的企业文化,感谢他们对我们的高要求,感谢他们从不同领域给我们带来的挑战,让我们激情的团队有机会用头脑与智慧不断的给客户带来惊喜。成都创新互联公司推出安塞免费做网站回馈大家。

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

运行结果:

易语言限制编辑框只能输入中文的方法

总结

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


新闻名称:易语言限制编辑框只能输入中文的方法
网站网址:http://pwwzsj.com/article/jpejod.html