易语言多个组件同时执行一个子程序的问题!
请教大神,现在程序里面有近百个按钮需要执行同一个子程序,有没有什么办法一次性的都添加上啊??一个一个的点击太麻烦了!~...
请教大神,现在程序里面有近百个按钮需要执行同一个子程序,有没有什么办法一次性的都添加上啊??一个一个的点击太麻烦了!~
展开
1个回答
展开全部
你好,这个问题很好解决的。
可以使用以下命令
调用格式: 〈逻辑型〉 事件转移 (通用型 组件一,[通用型 组件二]) - 系统核心支持库->其他
英文名称:EventPost
设置将第一个组件上产生的所有事件转交由第二个同窗口同类型组件的事件处理子程序去处理,就好象此事件是在第二个组件上实际发生的一样。本命令可用来设置用同一事件处理子程序处理来自多个同类型组件的事件。使用时可与“取事件组件”命令、对象的“标记”属性等相配合。设置成功返回真,失败返回假。本命令为中级命令。
参数<1>的名称为“组件一”,类型为“通用型(all)”。参数值指定欲将其事件转移的组件。如果该参数值指定的不是窗口内的组件,而是窗口本身,则不考虑“组件二”参数的设置情况,直接取消被指定窗口上所有组件事件转移设置。
参数<2>的名称为“组件二”,类型为“通用型(all)”,可以被省略。参数值指定组件一事件转移到的目的组件,必须与组件一的类型相同且在同一窗口内,否则命令会失败。如果本参数被省略,将取消组件一的原有事件转移设置。
操作系统需求: Windows
具体实现方法请参考以下代码:
.子程序 __启动窗口_创建完毕
事件转移 (选择框2, 选择框1)
事件转移 (选择框3, 选择框1)
'//请注意:只需要在 选择框1里面填写代码,其它的选择框2,选择框3....都不需要填写代码,该功能可以简化“重复功能”的代码量
.子程序 _选择框1_被单击
信息框 (“123”, 0, , )
希望我的回答对你有所帮助!Kiss灬小猪
追问
追答
你好,可以通过 标记 这个命令来实现。
详细请参考如下
.子程序 __启动窗口_创建完毕
.局部变量 i, 整数型
按钮1.标记 = “1”
按钮2.标记 = “2”
.计次循环首 (2, i)'//有多少个按钮,这里的第一个参数就填写多少数值
事件转移 (取标记组件 (i), 按钮3)
.计次循环尾 ()
.子程序 _按钮3_被单击
信息框 (“123”, 0, , )
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询