分类
易语言例程

易语言使用变量数组来无限复制组件源码

.版本 2 .程序集 窗口程序集_启动窗口 .程序集变量 pand, 整数型 .程序集变量 bianl, 按钮, , "1" .子程序 __启动窗口_创建完毕 pand = 1 _启动窗口.标题 = 到文本 (取启动时间 ()) .子程序 _按钮1_被单击 复制窗口组件 (按钮1, bianl [pand]) bianl [pand].可视 = 真 bianl [pand].高度 = 50 bianl [pand].宽度 = 50 bianl [pand].顶边 = 0 bianl [pand].左边 = 0 + pand × 50 pand = pand + 1 重定义数组 (bianl, 真, pand + 1)