易语言编辑框变量后退格键问题 20
.版本2.支持库spec.程序集窗口程序集1.程序集变量a,文本型.程序集变量密码,文本型.子程序_编辑框1_字符输入,整数型.参数字符代码,整数型.如果真(字符代码≠8...
.版本 2
.支持库 spec
.程序集 窗口程序集1
.程序集变量 a, 文本型
.程序集变量 密码, 文本型
.子程序 _编辑框1_字符输入, 整数型
.参数 字符代码, 整数型
.如果真 (字符代码 ≠ 8 且 字符代码 ≠ 13)
a = 字符 (字符代码)
.如果真 (a ≠ “@”)
密码 = 取文本左边 (密码, 编辑框1.起始选择位置) + a + 取文本右边 (密码, 取文本长度 (密码) - 编辑框1.起始选择位置)
编辑框1.内容 = 子文本替换 (编辑框1.内容, a, , , , 真)
处理事件 ()
编辑框1.加入文本 (“@”)
调试输出 (密码)
.如果真结束
.如果真结束
.子程序 _编辑框1_内容被改变
a = 密码
编辑框2.内容 = 到文本 (a) 展开
.支持库 spec
.程序集 窗口程序集1
.程序集变量 a, 文本型
.程序集变量 密码, 文本型
.子程序 _编辑框1_字符输入, 整数型
.参数 字符代码, 整数型
.如果真 (字符代码 ≠ 8 且 字符代码 ≠ 13)
a = 字符 (字符代码)
.如果真 (a ≠ “@”)
密码 = 取文本左边 (密码, 编辑框1.起始选择位置) + a + 取文本右边 (密码, 取文本长度 (密码) - 编辑框1.起始选择位置)
编辑框1.内容 = 子文本替换 (编辑框1.内容, a, , , , 真)
处理事件 ()
编辑框1.加入文本 (“@”)
调试输出 (密码)
.如果真结束
.如果真结束
.子程序 _编辑框1_内容被改变
a = 密码
编辑框2.内容 = 到文本 (a) 展开
2个回答
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询