刚刚求助区回答了一个问题 关于组件数组的操作

你不丑

感觉有点意思,故此分享一下.平时写软件貌似不这样写.留帖以备以后使用.以免忘记,

  

窗口程序集名	保 留	保 留	备 注
窗口程序集_启动窗口
变量名	类 型	数组	备 注
按钮	按钮	0

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

子程序名	返回值类型	公开	备 注
_按钮6_被单击

变量名	类 型	静态	数组	备 注
局_组件句柄	整数型
局_i	整数型

清除数组 (按钮)
局_组件句柄 ＝ 寻找组件 (_启动窗口, “按钮”, , , )
计次循环首 (取找到组件数目 (局_组件句柄), 局_i)
加入成员 (按钮, 取所找到组件 (局_组件句柄, 局_i － 1))
如果真 (按钮 [局_i].取窗口句柄 () ≠ 按钮7.取窗口句柄 ())
事件转移 (按钮 [局_i], 按钮7)

处理事件 ()
计次循环尾 ()
清除组件寻找句柄 (局_组件句柄)

子程序名	返回值类型	公开	备 注
_按钮7_被单击

变量名	类 型	静态	数组	备 注
局_按钮	按钮
局_i	整数型

局_按钮 ＝ 取事件组件 ()
调试输出 (局_按钮.标题, “你把我蛋挤了!”)

i支持库列表	支持库注释
spec	特殊功能支持库

.版本 2<br /> .支持库 spec<br /> <br /> .程序集 窗口程序集_启动窗口<br /> .程序集变量 按钮, 按钮, , "0"<br /> <br /> .子程序 __启动窗口_创建完毕<br /> <br /> <br /> <br /> .子程序 _按钮6_被单击<br /> .局部变量 局_组件句柄, 整数型<br /> .局部变量 局_i, 整数型<br /> <br /> 清除数组 (按钮)<br /> 局_组件句柄 ＝ 寻找组件 (_启动窗口, “按钮”, , , )<br /> .计次循环首 (取找到组件数目 (局_组件句柄), 局_i)<br />     加入成员 (按钮, 取所找到组件 (局_组件句柄, 局_i － 1))<br />     .如果真 (按钮 [局_i].取窗口句柄 () ≠ 按钮7.取窗口句柄 ())<br />         事件转移 (按钮 [局_i], 按钮7)<br />     .如果真结束<br /> <br />     处理事件 ()<br /> .计次循环尾 ()<br /> 清除组件寻找句柄 (局_组件句柄)<br /> <br /> <br /> .子程序 _按钮7_被单击<br /> .局部变量 局_按钮, 按钮<br /> .局部变量 局_i, 整数型<br /> <br /> 局_按钮 ＝ 取事件组件 ()<br /> 调试输出 (局_按钮.标题, “你把我蛋挤了!”)

hmyroot

收藏备用

蘇中二少

这是最基础的写法吧

你不丑

Suky 发表于 2024-3-17 13:05
不用加入成员，直接事件转移

不是那个加入成员是  求助帖的内容  

Suky

不用加入成员，直接事件转移