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

编辑框只能输入汉字例程

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

运行结果：

总结

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

赞 (0)

相关推荐

  • 易语言目录框的目录被改变后取得改变后的目录并在编辑框中显示

    易语言目录框的目录被改变后取得改变后的目录并在编辑框中显示

    目录属性 所属对象:目录框    操作系统支持:Windows,数据类型:文本型:设计时不可用: 语法:对象.目录 = 文本型 应用对象:目录框 例程 说明: 在目录框的目录被改变后,取得所改变的目录,在目录编辑框中显示出来. 运行结果: 总结 以上就是这篇文章的全部内容了,希望本文的内容对大家的学习或者工作具有一定的参考学习价值,谢谢大家对我们的支持.如果你想了解更多相关内容请查看下面相关链接

  • 易语言使用如果真命令判断编辑框内容是否正确的代码

    易语言使用如果真命令判断编辑框内容是否正确的代码

    如果真判断代码 .版本 2 .程序集 窗口程序集1 .子程序 __启动窗口_创建完毕 编辑框1.获取焦点 () .子程序 _显示内容按钮_被单击 .如果真 (编辑框1.内容 ≠ "中国队") 信息框 ("已修改为正确内容", 48, , ) 编辑框1.内容 ＝ "中国队" .如果真结束 编辑框1.内容 ＝ 编辑框1.内容 + "加油!" 运行结果: 总结 以上就是这篇文章的全部内容了,希望本文的内容对大家的学习或者工作具有一定

  • 易语言编辑框加背景图片代码实例

    易语言编辑框加背景图片代码实例

    DLL代码 .版本 2 .DLL命令 CreatePatternBrush, 整数型, "gdi32", "CreatePatternBrush" .参数 hBitmap, 整数型 .DLL命令 GetWindowLong, 整数型, "user32", "GetWindowLongA" .参数 hwnd, 整数型 .参数 nIndex, 整数型 .DLL命令 SetWindowLong, 整数型, "user32&

  • 易语言取出两个编辑框中相同内容的代码

    易语言取出两个编辑框中相同内容的代码

    对比两个编辑框内容的代码 .版本 2 .程序集 窗口程序集1 .子程序 _对比按钮_被单击 .局部变量 循环计次1, 整数型 .局部变量 文本1, 文本型, , "0" .局部变量 循环计次2, 整数型 .局部变量 文本2, 文本型, , "0" 对比结果编辑框.内容 ＝ "" 文本1 ＝ 分割文本 (编辑框1.内容, #换行符, ) 文本2 ＝ 分割文本 (编辑框2.内容, #换行符, ) .计次循环首 (取数组成员数 (文本1), 循环计次1

  • 易语言将编辑框透明化的代码实例

    易语言将编辑框透明化的代码实例

    DLL代码 .版本 2 .DLL命令 窗口_置信息_DLL, 整数型, , "SetWindowLongA", , 值 .参数 hwnd .参数 nIndex .参数 dwNewLong .DLL命令 窗口_置透明度_DLL, 整数型, , "SetLayeredWindowAttributes" .参数 hwnd .参数 crkey .参数 alpha, 字节型 .参数 dwflags .DLL命令 窗口_取信息_DLL, 整数型, "user32&qu

  • 易语言让编辑框和窗口大小随时一致方法

    这是个很简单的技巧,适合小白,新手看. 1.第一步打开易语言,易语言编译器没有下载的可以联系我哦. 2.创建windows下的窗口程序. 3.接下来,就能看到这个初始界面,然后往左边拖动组件. 4.然后注意我箭头所指方向,创建窗口尺寸被改变事件. 5. 编辑框1.宽度 ＝ _启动窗口.宽度 编辑框1.高度 ＝ _启动窗口.高度 6.还要设置一下窗口可以改变大小.回到ui界面.按图所示设置好,然后运行,你就能看到预期的效果了. 总结:以上就是关于易语言如何实现编辑框和窗口大小随时一致的方法,感谢大

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

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

    编辑框只能输入汉字例程 .版本 2 .支持库 RegEx .支持库 spec .程序集 启动窗口程序集 .程序集变量 过滤后文本, 文本型 .子程序 __启动窗口_创建完毕 默认窗口 ＝ SetWindowLongA (编辑框1.取窗口句柄 (), -4, &处理) .子程序 处理, 整数型, , 不要修改该子程序的返回值及参数的类型! .参数 句柄, 整数型 .参数 消息, 整数型 .参数 参数1, 整数型 .参数 参数2, 整数型 .局部变量 文本字节集, 字节集 .局部变量 i, 整数型

  • js限制文本框只能输入中文的方法

    js限制文本框只能输入中文的方法

    本文实例讲述了js限制文本框只能输入中文的方法.分享给大家供大家参考.具体如下: 让文本框只能输入中文的方法及代码,如果你不小心输入了英文,它会自动倒回去,清空你的输入,直至你输入了中文它可会继续,很有意思,也很实用,当注册一些资料的时候可以来提升输入的准确度. 运行效果如下图所示: 具体代码如下: <html> <head> <title>让一个文本框只能输入汉字的方法</title> <meta http-equiv="Content-T

  • 易语言更改编辑框中文字颜色的方法

    易语言更改编辑框中文字颜色的方法

    文本颜色属性 所属对象:编辑框  操作系统支持:Windows 数据类型:整数型: 例程 说明 本属性用于更改和获取编辑框中文字的颜色. 运行结果: 总结 以上就是这篇文章的全部内容了,希望本文的内容对大家的学习或者工作具有一定的参考学习价值,谢谢大家对我们的支持.如果你想了解更多相关内容请查看下面相关链接

  • js控制文本框只能输入中文、英文、数字与指定特殊符号的实现代码

    JS 控制文本框只能输入数字 <input onkeyup="value=value.replace(/[^0-9]/g,'')"onpaste="value=value.replace(/[^0-9]/g,'')" oncontextmenu ="value=value.replace(/[^0-9]/g,'')"> JS 控制文本框只能输入数字.小数点 <inputonkeyup="value=value.repl

  • 易语言超级编辑框中寻找指定文本并选中的示例

    易语言超级编辑框中寻找指定文本并选中的示例

    超级编辑框中寻找指定文本并选中 .版本 2 .支持库 iext2 .程序集 窗口程序集1 .子程序 __启动窗口_创建完毕 .子程序 取字符数, 整数型 .参数 文本, 文本型 .局部变量 长度, 整数型 .局部变量 个数, 整数型 .局部变量 字符位置, 整数型 长度 ＝ 取文本长度 (文本) 个数 ＝ 长度 字符位置 ＝ 1 .判断循环首 (字符位置 < 长度) .如果 (取代码 (取文本中间 (文本, 字符位置, 1), ) < 0 或 取代码 (取文本中间 (文本, 字符位置, 1),

  • 易语言在编辑框中只允许输入指定类型内容的方法

    易语言在编辑框中只允许输入指定类型内容的方法

    输入方式属性 所属对象:编辑框   操作系统支持:Windows 数据类型:整数型: 可供选择的属性值: 0.通常方式 1.只读方式 2.密码输入 3.整数文本输入 4.小数文本输入 5.输入字节 6.输入短整数 7.输入整数 8.输入长整数 9.输入小数 10.输入双精度小数 11.输入日期时间 例程 说明 本属性用于定义在指定编辑框中所允许输入的内容和显示方式. 运行结果: 总结 以上就是这篇文章的全部内容了,希望本文的内容对大家的学习或者工作具有一定的参考学习价值,谢谢大家对我们的支持.如

  • 易语言设定编辑框内最多允许输入多少字节的方法

    易语言设定编辑框内最多允许输入多少字节的方法

    最大允许长度属性 所属对象:编辑框   操作系统支持:Windows 数据类型:整数型:本属性设置最大允许输入到本组件中的字符数目,如为0则输入字符数目不受限制. 例程 说明 本命令用于取得和设定编辑框中最多允许写入多少字节的内容. 运行结果: 总结 以上就是这篇文章的全部内容了,希望本文的内容对大家的学习或者工作具有一定的参考学习价值,谢谢大家对我们的支持.如果你想了解更多相关内容请查看下面相关链接

  • 易语言设置编辑框是否使用多行显示的方法

    易语言设置编辑框是否使用多行显示的方法

    是否允许多行属性 所属对象:编辑框   操作系统支持:Windows 数据类型:逻辑型:本属性设置本组件是否允许输入多行文本. 例程 说明 本属性用于设置和获取指定编辑框是否使用多行显示. 运行结果: 总结 以上就是这篇文章的全部内容了,希望本文的内容对大家的学习或者工作具有一定的参考学习价值,谢谢大家对我们的支持.如果你想了解更多相关内容请查看下面相关链接

  • 易语言改变编辑框背景颜色的方法

    易语言改变编辑框背景颜色的方法

    背景颜色属性 所属对象:编辑框   操作系统支持:Windows 数据类型:整数型: 例程 说明 本属性用于取得和更改编辑框的背景颜色. 运行结果: 总结 以上就是这篇文章的全部内容了,希望本文的内容对大家的学习或者工作具有一定的参考学习价值,谢谢大家对我们的支持.如果你想了解更多相关内容请查看下面相关链接

随机推荐