按键精灵界面输入框密文显示(用*隐藏密码)

按键精灵界面输入框密文显示(用*隐藏密码)

群友问到这么一个问题,就是密文显示,本身按键界面是没有这个功能,这里通过写一个响应函数来实现。

先来看一下效果:

按键精灵界面输入框密文显示(用*隐藏密码)

由于输入框没有响应事件,所以没法直接在输入的过程中变成星号,因此我这里借助了一个多选框来实现。

当多选框点击选中的时候,密码会被隐藏,以星号显示,取消多选框的勾选时,又会恢复成密码明文。

一、说一下它的原理:
我们在使用星号显示的时候,其实是把输入框原本内容存入到一个文本当中。这样就不会因为输入框内容修改成星号,而导致内容丢失了。

二、具体的操作步骤:

界面中有效的元素只有两个输入框和一个多选框,这里就不说它了。

按键精灵界面输入框密文显示(用*隐藏密码)
我们直接介绍多选框点击的响应函数:

1、获取输入框1、输入框2的内容

Dim m=uip.GetAttribute(“输入框1”)
Dim n=uip.GetAttribute(“输入框2”)

2、获取多选框的选中状态

Dim x=uip.GetAttribute(“多选框1”)

3、对于多选框的选中状态进行判断,2种情况

(1)选中的情况,把输入框2(也就是密码输入框)的内容读取出来,并存入到指定的文本当中,这里我是以输入框1的内容作为文本的名称,用固定的名称也可以,在存储之后,就可以给输入框写入几个星号了。

(2)未选中的情况,读取上一步中存取输入框2的文本,然后把内容写入到输入框2中,替换掉星号。

If x[“选中”] Then
If len(m[“初始文本”]) = 0 Then
ShowMessage “先输入账号”
UIP.SetAttribute (“多选框1”,{“选中”:false})
Else
file.write (“/sdcard/pictures/” & m[“初始文本”] & “.txt”,n[“初始文本”])
uip.SetAttribute (“输入框2”,{“初始文本”:”********”})
End If
Else
Dim k=file.read (“/sdcard/pictures/” & m[“初始文本”] & “.txt”)
uip.SetAttribute (“输入框2”,{“初始文本”:k})
End If

最终的代码:

按键精灵界面输入框密文显示(用*隐藏密码)

三、关于脚本调用输入框:

当我们脚本要调用输入框的时候,先把输入框的内容读取出来,然后判断输入框是星号还是密码,如果是星号就读取存入密码的文本,如果不是星号,就可以直接读取输入框的内容使用。

——————————————

原文始发于微信公众号(3分钟学堂):

除特别注明外,本站文章均为原创,转载请注明出处和链接!
本文链接地址: https://pumpkinit.com/765.html
Pumpkin  [https://pumpkinit.com]  感谢

发表评论

电子邮件地址不会被公开。 必填项已用*标注