易语言编辑框获得焦点时全部选中?怎么写

这个不用用获得焦点来处理事件，应该用被单击，或者左键被放开。编辑框没有被单击的事件，所以我们只能用左键被放开了。
下面是我简单写的一个例子，你参考一下。
版本 2
程序集 窗口程序集1
程序集变量 是否有焦点, 逻辑型
子程序 _编辑框1_失去焦点
是否有焦点 ＝ 假
子程序 _编辑框1_鼠标左键被放开, 逻辑型
参数 横向位置, 整数型
参数 纵向位置, 整数型
参数 功能键状态, 整数型
如果真 (取反 (是否有焦点))
编辑框1起始选择位置 ＝ 0
编辑框1被选择字符数 ＝ -1
是否有焦点 ＝ 真
如果真结束

呃……默认字符，然后鼠标事件产生时清空不就行了？
再做一个逻辑判断，鼠标聚焦离开时，则判断编辑框中是否有已经输入的字符，如果有的话，则不再执行，如果没有的话，那么再重新将值赋给编辑框即可

限制编辑框输入。编辑框有个输入方式属性，你可以选那里，
下面是实现你要的那个功能。获得焦点时编辑框内容清空。失去焦点时编辑框内容显示提示内容！还不懂可以加我QQ373777010
版本
2
程序集
窗口程序集1
子程序
_编辑框1_获得焦点
编辑框1内容
＝
“”
子程序
_编辑框1_失去焦点
编辑框1内容
＝
“只能输入数字”

版本 2
_启动窗口获取焦点 ()
编辑框1内容 ＝ “请输入帐号”
编辑框1文本颜色 ＝ #浅灰
子程序 _编辑框1_获得焦点
编辑框1内容 ＝ “”
编辑框1文本颜色 ＝ #黑色
子程序 _编辑框1_失去焦点
如果真 (编辑框1内容 ＝ “”)
编辑框1内容 ＝ “请输入帐号”
编辑框1文本颜色 ＝ #浅灰
可以利用获取焦点和失去焦点事件来触发编辑框1内容和文本颜色
则也可以利用编辑框_左键被单击来触发 ，如还有不明白，请追问。

用超级模块的监视热键(&获取焦点,#回车键)
然后获取焦点的子程序下面写命令：
编辑框1失去焦点()
编辑框2获取焦点()
如果真(编辑框2失去焦点())
编辑框1获取焦点()

---