修改封装的窗口缩放模块支持动态

易语言修改封装的简单方便窗口缩放模块支持动态例子。

.计次循环首 (总可复制个数, )
建按钮 ＝ 假
复制窗口组件 (按钮1, 变量1)
.如果真 (个数 ＜ 总可复制个数)
.如果 (当前按钮行 ＝ 0)
变量1.左边 ＝ (个数 ＋ 1) × 按钮1.宽度 ＋ 按钮1.左边 × (个数 ＋ 1)
变量1.顶边 ＝ 按钮1.顶边
个数 ＝ 个数 ＋ 1
.如果真 (个数 ％ 行可复制个数 ＝ 行可复制个数 － 1)
当前按钮行 ＝ 当前按钮行 ＋ 1
.如果真结束

.否则
当前按钮列 ＝ (个数 ＋ 1) ％ 行可复制个数
变量1.左边 ＝ 当前按钮列 × 按钮1.宽度 ＋ 按钮1.左边 × 当前按钮列
变量1.顶边 ＝ 按钮1.顶边 ＋ 当前按钮行 × 按钮1.高度
个数 ＝ 个数 ＋ 1
.如果真 ((个数 ＋ 1) ％ 行可复制个数 ＝ 0)
当前按钮行 ＝ 当前按钮行 ＋ 1
.如果真结束

.如果结束
建按钮 ＝ 真
.如果真结束
.如果真 (建按钮 ＝ 真)
变量1.可视 ＝ 真
变量1.标题 ＝ 变量1.标题 ＋ 到文本 (个数)
窗口缩放.记录全部窗口 ()
.如果真结束

.计次循环尾 ()