sjl1642 发表于 2020-4-8 17:52:38

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

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

sjl1642 发表于 2020-4-8 18:01:31

不吃香菜 发表于 2020-4-8 19:37:18

我蹭个币

sjl1642 发表于 2020-4-8 20:14:00

别乱蹭，怀孕了呢

易辈子 发表于 2020-4-8 20:56:31

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

.版本 2
.支持库 shellEx

.程序集 窗口程序集_启动窗口
.程序集变量 上
.程序集变量 下
.程序集变量 左
.程序集变量 右
.程序集变量 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)
    编辑框.获取焦点 ()
.如果真结束


yyz860723 发表于 2021-5-29 00:25:27

楼主发贴辛苦了，谢谢楼主分享！我觉得易语言吧是注册对了！
页: [1]
查看完整版本: 如何实现多个编辑框上下左右选择，被选编辑框内容为选定