如何实现多个编辑框上下左右选择，被选编辑框内容为选定

sjl1642

如图，134个编辑框，按键两个，上下左右没反应，TAB键还不按顺序，还有个图片可以看出，如何实现上下左右或TAB键选择到的编辑框内容为全选，还有个问题，怎么等比例缩小放大，才学易语言3天，

sjl1642

[img][/img]

不吃香菜

我蹭个币

sjl1642

别乱蹭，怀孕了呢

易辈子

编辑框实下上下左右方向键。移动编辑框焦点例子。你参考下

  

窗口程序集名	保 留	保 留	备 注
窗口程序集_启动窗口
变量名	类 型	数组	备 注
上
下
左
右
i	整数型

子程序名	返回值类型	公开	备 注
__启动窗口_创建完毕

上 ＝ 注册热键 (_启动窗口.取窗口句柄 (), 标签1.取窗口句柄 (), 0, #上光标键 )
下 ＝ 注册热键 (_启动窗口.取窗口句柄 (), 标签1.取窗口句柄 (), 0, #下光标键 )
左 ＝ 注册热键 (_启动窗口.取窗口句柄 (), 标签1.取窗口句柄 (), 0, #左光标键 )
右 ＝ 注册热键 (_启动窗口.取窗口句柄 (), 标签1.取窗口句柄 (), 0, #右光标键 )
i ＝ 1

子程序名	返回值类型	公开	备 注
_标签1_反馈事件	整数型
参数名	类 型	参考	可空	数组	备 注
参数一	整数型
参数二	整数型

变量名	类 型	静态	数组	备 注
编辑框	编辑框

如果真 (参数一 ＝ 上)
如果真 (i － 1 ＜ 1)
返回 ()
i ＝ i － 1
编辑框 ＝ 取标记组件 (i)
编辑框.获取焦点 ()
如果真 (参数一 ＝ 下)
如果真 (i ＋ 1 ＞ 25)
返回 ()
i ＝ i ＋ 1
编辑框 ＝ 取标记组件 (i)
编辑框.获取焦点 ()
如果真 (参数一 ＝ 左)
如果真 (i － 5 ＜ 1)
返回 ()
i ＝ i － 5
编辑框 ＝ 取标记组件 (i)
编辑框.获取焦点 ()
如果真 (参数一 ＝ 右)
如果真 (i ＋ 5 ＞ 25)
返回 ()
i ＝ i ＋ 5
编辑框 ＝ 取标记组件 (i)
编辑框.获取焦点 ()

i支持库列表	支持库注释
shellEx	扩展功能支持库一

.版本 2<br /> .支持库 shellEx<br /> <br /> .程序集 窗口程序集_启动窗口<br /> .程序集变量 上<br /> .程序集变量 下<br /> .程序集变量 左<br /> .程序集变量 右<br /> .程序集变量 i, 整数型<br /> <br /> .子程序 __启动窗口_创建完毕<br /> <br /> 上 ＝ 注册热键 (_启动窗口.取窗口句柄 (), 标签1.取窗口句柄 (), 0, #上光标键)<br /> 下 ＝ 注册热键 (_启动窗口.取窗口句柄 (), 标签1.取窗口句柄 (), 0, #下光标键)<br /> 左 ＝ 注册热键 (_启动窗口.取窗口句柄 (), 标签1.取窗口句柄 (), 0, #左光标键)<br /> 右 ＝ 注册热键 (_启动窗口.取窗口句柄 (), 标签1.取窗口句柄 (), 0, #右光标键)<br /> i ＝ 1<br /> <br /> .子程序 _标签1_反馈事件, 整数型<br /> .参数 参数一, 整数型<br /> .参数 参数二, 整数型<br /> .局部变量 编辑框, 编辑框<br /> <br /> .如果真 (参数一 ＝ 上)<br />     .如果真 (i － 1 ＜ 1)<br />         返回 ()<br />     .如果真结束<br />     i ＝ i － 1<br />     编辑框 ＝ 取标记组件 (i)<br />     编辑框.获取焦点 ()<br /> .如果真结束<br /> .如果真 (参数一 ＝ 下)<br />     .如果真 (i ＋ 1 ＞ 25)<br />         返回 ()<br />     .如果真结束<br />     i ＝ i ＋ 1<br />     编辑框 ＝ 取标记组件 (i)<br />     编辑框.获取焦点 ()<br /> .如果真结束<br /> .如果真 (参数一 ＝ 左)<br />     .如果真 (i － 5 ＜ 1)<br />         返回 ()<br />     .如果真结束<br />     i ＝ i － 5<br />     编辑框 ＝ 取标记组件 (i)<br />     编辑框.获取焦点 ()<br /> .如果真结束<br /> .如果真 (参数一 ＝ 右)<br />     .如果真 (i ＋ 5 ＞ 25)<br />         返回 ()<br />     .如果真结束<br />     i ＝ i ＋ 5<br />     编辑框 ＝ 取标记组件 (i)<br />     编辑框.获取焦点 ()<br /> .如果真结束

yyz860723

楼主发贴辛苦了，谢谢楼主分享！我觉得易语言吧是注册对了！