复制组件,如何复制图片框？

千城偶吧

利用复制组件如何达到右边的效果？
并且知道鼠左键或者右键了哪个图片框？
然后假设我要对右边的第三个图片框加入图片 #图片  我该怎么加入到第三个？

鹏书

https://www.bilibili.com/video/BV1a24y1e7TE/

10008508

.局部变量 新图片框, 图片框
新图片框 = 创建(“图片框”, 父窗口句柄)

音速

https://bbs.125.la/forum.php?mod=viewthread&tid=14692927
这有源码   组件复制跟 组件事件的使用

aipca

  

窗口程序集名	保 留	保 留	备 注
窗口程序集_启动窗口

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

变量名	类 型	静态	数组	备 注
图片框	图片框		0
i	整数型
数量	图片框
a	整数型

计次循环首 (16, a)
复制窗口组件 (图片框1, 数量)
加入成员 (图片框, 数量)
计次循环尾 ()
计次循环首 (取数组成员数 (图片框), i)
图片框 [i].可视 ＝ 真
判断 (i ％ 2 ＝ 0)
图片框 [i].左边 ＝ 15 ＋ 50 ＋ 1
图片框 [i].顶边 ＝ (25 ＋ 1) �� (i － 2) ＋ 10
判断 (i ％ 2 ≠ 0)
图片框 [i].左边 ＝ 15
图片框 [i].顶边 ＝ (25 ＋ 1) �� (i － 1) ＋ 10



事件转移 (图片框 [i], 图片框1)
计次循环尾 ()

子程序名	返回值类型	公开	备 注
_图片框1_鼠标左键被按下	逻辑型
参数名	类 型	参考	可空	数组	备 注
横向位置	整数型
纵向位置	整数型
功能键状态	整数型

变量名	类 型	静态	数组	备 注
事件响应	图片框

事件响应 ＝ 取事件组件 ()
通用对话框1.打开 ()
通用对话框1.初始目录 ＝ 取运行目录 () ＋ “\img”
事件响应.图片 ＝ 读入文件 (通用对话框1.文件名)

.版本 2<br /> <br /> .程序集 窗口程序集_启动窗口<br /> <br /> .子程序 __启动窗口_创建完毕<br /> .局部变量 图片框, 图片框, , "0"<br /> .局部变量 i, 整数型<br /> .局部变量 数量, 图片框<br /> .局部变量 a, 整数型<br /> <br /> .计次循环首 (16, a)<br />     复制窗口组件 (图片框1, 数量)<br />     加入成员 (图片框, 数量)<br /> .计次循环尾 ()<br /> .计次循环首 (取数组成员数 (图片框), i)<br />     图片框 <i>.可视 ＝ 真<br />     .判断开始 (i ％ 2 ＝ 0)<br />         图片框 <i>.左边 ＝ 15 ＋ 50 ＋ 1<br />         图片框 <i>.顶边 ＝ (25 ＋ 1) × (i － 2) ＋ 10<br />     .判断 (i ％ 2 ≠ 0)<br />         图片框 <i>.左边 ＝ 15<br />         图片框 <i>.顶边 ＝ (25 ＋ 1) × (i － 1) ＋ 10<br />     .默认<br /> <br />     .判断结束<br /> <br />     事件转移 (图片框 <i>, 图片框1)<br /> .计次循环尾 ()<br /> <br /> .子程序 _图片框1_鼠标左键被按下, 逻辑型<br /> .参数 横向位置, 整数型<br /> .参数 纵向位置, 整数型<br /> .参数 功能键状态, 整数型<br /> .局部变量 事件响应, 图片框<br /> <br /> 事件响应 ＝ 取事件组件 ()<br /> 通用对话框1.打开 ()<br /> 通用对话框1.初始目录 ＝ 取运行目录 () ＋ “\img”<br /> 事件响应.图片 ＝ 读入文件 (通用对话框1.文件名)

补充内容 (2025-4-5 16:46):
×号为啥会变成了特殊问号？

aipca

补个E吧。

走一回

完美解决方案的源码
复制图片框并加载图片.e (3.34 KB, 下载次数: 0)

2025-4-5 16:56 上传

点击文件名下载附件

xizhihan

https://www.eyuyan.la/post/7265.html
这个所有组件都能复制

cqcc

好像他说的是复制组件的时候第三个加入指定图片，其他不加