关于多个编辑框上下左右键无效的问题

sjl1642 · 发表于 2020-4-8 18:58:17

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

没有细胞的人 · 发表于 2020-4-8 18:58:18

sjl1642 发表于 2020-4-8 20:16
还有，要的是所有对话框上下左右都有用，不是单独

刚刚我发的那条你可以适当地看一下，现在更改一下

1、首先把所有编辑框组件属性里的“可停留焦点”设置为假（防止tab切换组件焦点，导致tab全选文本出现错误）
QQ图片20200408204813.png

2、修改代码
原来的代码修改为

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

监视热键 (&子程序1, 9, , , 10, 真)  ' tab键
监视热键 (&子程序1, 37, , , 10, 真)  ' 左箭头键
监视热键 (&子程序1, 38, , , 10, 真)  ' 上箭头键
监视热键 (&子程序1, 39, , , 10, 真)  ' 右箭头键
监视热键 (&子程序1, 40, , , 10, 真)  ' 下箭头键

子程序名	返回值类型	公开	备注
子程序1

如果 (编辑框1.可有焦点 () ＝真)

文本全选 (编辑框1.取窗口句柄 (), 真) ' 全选文本

如果 (编辑框2.可有焦点 () ＝真)

文本全选 (编辑框2.取窗口句柄 (), 真) ' 全选文本

如果 (编辑框3.可有焦点 () ＝真)

文本全选 (编辑框3.取窗口句柄 (), 真) ' 全选文本

如果 (编辑框4.可有焦点 () ＝真)

文本全选 (编辑框4.取窗口句柄 (), 真) ' 全选文本

如果 (编辑框5.可有焦点 () ＝真)

文本全选 (编辑框5.取窗口句柄 (), 真) ' 全选文本

如果有更多编辑框，继续增加即可。 [在如果命令的否则里增加以下命令：
                                                                                                      .如果 (编辑框名称.可有焦点 () ＝真)
                                                                                                      文本全选 (编辑框名称.取窗口句柄 (), 真)
                                                                                                      .否则
                                                                                                      .如果结束
                                                   ]
（PS：我认为我上面的排版应该不乱）

如果不懂，看源码：

源码.zip (1.64 MB, 下载次数: 3)

sjl1642 · 发表于 2020-4-8 19:14:16

这号你看看帖子，以前是要求东西
，

没有细胞的人 · 发表于 2020-4-8 19:48:41

命令调用了超级模块

监视热键 (&子程序1, 9, , , 10, 假)  ' tab键
监视热键 (&子程序1, 37, , , 10, 假)  ' 左箭头键
监视热键 (&子程序1, 38, , , 10, 假)  ' 上箭头键
监视热键 (&子程序1, 39, , , 10, 假)  ' 右箭头键
监视热键 (&子程序1, 40, , , 10, 假)  ' 下箭头键

子程序名	返回值类型	公开	备注
子程序1

文本全选 (编辑框1.取窗口句柄 (), 真) ' 全选文本

超级模块下载地址：https://lanzoux.com/ib4nvwb

补充内容 (2020-4-8 19:50):
监视热键命令放在你想在什么时候条件触发之后开始检测热键，
例如：
_启动窗口_创建完毕
检测热键......

sjl1642 · 发表于 2020-4-8 20:09:00

能具体点么？

sjl1642 · 发表于 2020-4-8 20:16:53

还有，要的是所有对话框上下左右都有用，不是单独

没有细胞的人 · 发表于 2020-4-8 20:30:26

sjl1642 发表于 2020-4-8 20:16
还有，要的是所有对话框上下左右都有用，不是单独

我认为我已经够具体了，

看图：

所有命令皆调用超级模块（亲测精易模块的文本_全选不是很好用，当然也有可能是我不会用）
PS:下面加了引号（“”）并不代表文本型，而是我告诉你的一个固定内容

“监测热键”命令中的“&子程序1”是子程序指针，需要你自己创建一个子程序，里面放上你要执行的命令（“文本全选”命令）
“监测热键”命令中的“9”、“37”、“38”、“39”、“40”是热键代码。这里的9代表TAB键；37代表←键；38代表↑键；39代表→键；40代表↓键
“监测热键”命令中的“10”代表监测周期，一般填10即可“监测热键”命令中的“假”代表是否直接触发，选择“假”就创建一个新的线程，不等待“子程序1”执行完毕；“真”则等待“子程序1”执行完毕后再继续向下执行

子程序1中的文本全选命令：
第一个是编辑框的句柄，用编辑框名称“.取窗口句柄” 来获取
第二个是是否全选，选择“真”

另外，这个确实是无论你按下了上左下右还是tab键都能全选，不是单个！！

还有，易语言本身命令支持库不带有文本全选命令，需要调用超级模块，所以不是“关于多个编辑框上下左右键无效问题”！这个不是问题！
还有，看得出来，你确实学易语言只学了2、3天，如果不懂，就好好看下命令提示！

批注 2020-04-08 202815.png

如果还不懂，这边建议您先别做这个功能，等你学了一周了再回来看看。

（你这2、3天也没学多点东西啊）

补充内容 (2020-4-8 20:32):
码字不易，听懂了采纳一下。
听不懂，，，建议你先多学一会易语言，我已经说的十分通俗易懂了吧，，，，，，

补充内容 (2020-4-8 20:39):
奥，我刚明白你说的意思，你的意思是哪个编辑框获取了焦点，就全选哪个对吧，稍等我给你改下代码

补充内容 (2020-4-8 20:59):
代码改完了，看下面7楼我发的

sjl1642 · 发表于 2020-4-8 22:14:30

大哥，我觉得您根本没明白我的意思，我的意思是上下左右不是某个编辑框内容的全选，而是移动+全选，比如编辑框11输入完内容后：1.按右键，自动到编辑框12，并且把编辑框12的内容全选，2.按下键，自动到编辑框18，并且把编辑框18的内容全选,3.按坐键，自动到编辑框10，并且把编辑框10的内容全选，4.按上键，自动到编辑框4，并且把编辑框4的内容全选，5.按tab建，自动到编辑框12，并且把编辑框12的内容全选

sjl1642 · 发表于 2020-4-8 23:12:39

就是类似表格，上下左右tab，https://bbs.125.la/forum.php?mod ... 14556056&extra=
100辛苦费，哪位大神看能帮忙搞定不

没有细胞的人 · 发表于 2020-4-9 08:53:07

sjl1642 发表于 2020-4-8 22:14
大哥，我觉得您根本没明白我的意思，我的意思是上下左右不是某个编辑框内容的全选，而是移动+全选，比如编 ...

害，，你早说啊，每个编辑框加上判定，如果哪个编辑框有焦点，判断按下了哪个键，然后全选另一个编辑框的文本

代码帮你码好了，你下下来看看是不是这样

附件上传不上去，放蓝奏了：https://lanzoux.com/ib55ote

可能有点复杂，如果你嫌麻烦，把你源码的界面发给我，我来帮你码完这堆代码
源码里的监视热键还是调用了超级模块，监视每个编辑框按下了某件的程序事件也可以，但是会更麻烦

（没猜错应该没理解错了吧，，）

补充内容 (2020-4-9 08:58):
因为我在您的帖子的回复中未能帮助到您，现已将100悬赏精币退回，请查收。
如果没猜错，这次源码应该没有问题了吧。
我愿意接你那个定制帖子的单

		自动登录	找回密码
密码			注册

[完成] 关于多个编辑框上下左右键无效的问题

最佳答案

点评