【复制组件】批量复制窗口组件且可用原生方式调用

jy2013

感谢分享，很给力！

TIANL

huyuan 发表于 2024-8-6 06:21
exui的能用这个复制么

这个复制不了，exui好像有自己的复制方法

dj1990

感谢您对论坛的支持！

huyuan

exui的能用这个复制么

729004823

TIANL 发表于 2024-8-5 15:52
2024.8.5新增了两个类方法，解决了嵌套容器复制的问题，你把这个代码里面的类模块改到你的代码里面应该 ...

非常感谢大佬  后面直接做成模块吧大佬 嘿嘿

TIANL

729004823 发表于 2024-8-3 17:02
改了还是不行 老大

窗口组件批量复制类模块测试.e (275.63 KB, 下载次数: 6)

2024-8-5 15:45 上传

点击文件名下载附件
2024.8.5新增了两个类方法，解决了嵌套容器复制的问题，你把这个代码里面的类模块改到你的代码里面应该就行了，后面有时间可能会重新整理一下代码发个新版的，第一代版本最开始没想那么多，有些问题考虑不周，一百多条的下载量，就只见你反馈问题了

729004823

TIANL 发表于 2024-8-1 18:36
当初是考虑嵌套情况，但写的时候不知道怎么忘记了，你把 窗口组件.获取_通用组件_名称()，这条命令的代码 ...

改了还是不行 老大

TIANL

729004823 发表于 2024-8-1 14:43
我找到问题所在了大佬，我的外形框里面还嵌套了其它的外形框，外形框NPC的对话框里面还有四个外形框，要 ...

当初是考虑嵌套情况，但写的时候不知道怎么忘记了，你把 窗口组件.获取_通用组件_名称()，这条命令的代码改成下面这个就行了

  

变量名	类 型	静态	数组	备 注
数量	整数型
候补命中	整数型
i	整数型

数量 ＝ 取数组成员数 (成员_数组_窗口组件_属性)
候补命中 ＝ 0
计次循环首 (数量, i)
判断 (成员_数组_窗口组件_属性 [数量 － i ＋ 1].名称 ＝ 参_组件名称)
判断 (成员_数组_窗口组件_属性 [数量 － i ＋ 1].父句柄 ＝ 参_父组件句柄)
成员_数组_窗口组件_属性 [数量 － i ＋ 1].指针 ＝ 数据_取数组jz (成员_数组_窗口组件_属性 [数量 － i ＋ 1].类型) ＋ 成员_数组_窗口组件_属性 [数量 － i ＋ 1].偏移 × 8
取数据_指针到窗口组件 (成员_数组_窗口组件_属性 [数量 － i ＋ 1].指针, 参_返回组件)
返回 (IsWindow (成员_数组_窗口组件_属性 [数量 － i ＋ 1].句柄))

判断 (成员_数组_窗口组件_属性 [数量 － i ＋ 1].祖句柄 ＝ 参_父组件句柄)
候补命中 ＝ 数量 － i ＋ 1






计次循环尾 ()
如果真 (候补命中 ＞ 0 且 候补命中 ≤ 数量)
成员_数组_窗口组件_属性 [候补命中].指针 ＝ 数据_取数组jz (成员_数组_窗口组件_属性 [候补命中].类型) ＋ 成员_数组_窗口组件_属性 [候补命中].偏移 × 8
取数据_指针到窗口组件 (成员_数组_窗口组件_属性 [候补命中].指针, 参_返回组件)
返回 (IsWindow (成员_数组_窗口组件_属性 [候补命中].句柄))
返回 (假)

.版本 2<br /> <br /> .局部变量 数量, 整数型<br /> .局部变量 候补命中, 整数型<br /> .局部变量 i, 整数型<br /> <br /> 数量 ＝ 取数组成员数 (成员_数组_窗口组件_属性)<br /> 候补命中 ＝ 0<br /> .计次循环首 (数量, i)<br />     .判断开始 (成员_数组_窗口组件_属性 [数量 － i ＋ 1].名称 ＝ 参_组件名称)<br />         .判断开始 (成员_数组_窗口组件_属性 [数量 － i ＋ 1].父句柄 ＝ 参_父组件句柄)<br />             成员_数组_窗口组件_属性 [数量 － i ＋ 1].指针 ＝ 数据_取数组jz (成员_数组_窗口组件_属性 [数量 － i ＋ 1].类型) ＋ 成员_数组_窗口组件_属性 [数量 － i ＋ 1].偏移 × 8<br />             取数据_指针到窗口组件 (成员_数组_窗口组件_属性 [数量 － i ＋ 1].指针, 参_返回组件)<br />             返回 (IsWindow (成员_数组_窗口组件_属性 [数量 － i ＋ 1].句柄))<br /> <br />         .判断 (成员_数组_窗口组件_属性 [数量 － i ＋ 1].祖句柄 ＝ 参_父组件句柄)<br />             候补命中 ＝ 数量 － i ＋ 1<br />         .默认<br /> <br />         .判断结束<br /> <br />     .默认<br /> <br />     .判断结束<br /> <br /> .计次循环尾 ()<br /> .如果真 (候补命中 ＞ 0 且 候补命中 ≤ 数量)<br />     成员_数组_窗口组件_属性 [候补命中].指针 ＝ 数据_取数组jz (成员_数组_窗口组件_属性 [候补命中].类型) ＋ 成员_数组_窗口组件_属性 [候补命中].偏移 × 8<br />     取数据_指针到窗口组件 (成员_数组_窗口组件_属性 [候补命中].指针, 参_返回组件)<br />     返回 (IsWindow (成员_数组_窗口组件_属性 [候补命中].句柄))<br /> .如果真结束<br /> 返回 (假)

lzhenwen

好东西 啊

lzhenwen

学习学习，，，