程序批量复制组件功能

易语言 2020-04-04 15:49:21

程序批量复制组件功能

.计次循环首 (复制个数, ii)
复制窗口组件 (选择框_母体, 返回的组件 [ii])
返回的组件 [ii].左边 = 起点x + (ii - 1 - 5 × 换行次数) × 标准宽 + (ii - 1 - 5 × 换行次数) × 左右间隔
返回的组件 [ii].顶边 = 起点y
返回的组件 [ii].可视 = 可视1
.如果 (是否为空 (标题1))
返回的组件 [ii].标题 = 到文本 (ii)
.否则
返回的组件 [ii].标题 = 标题1 [ii]
.如果结束
.如果真 (ii = 几个一排 或 换行次数 > 0 且 ii % 几个一排 = 0) ' 到达条件换行
起点x = 0
换行次数 = 换行次数 + 1
起点y = 起点y + 标准高 + 上下间隔 - 10
.如果真结束

.计次循环尾 ()