横向滚动条、分组框操作、复制组件

横向滚动条1.位置 ＝ 到整数 (编辑框_跳到指定.内容)
索引 ＝ 横向滚动条1.位置
显示数量 ＝ 窗口显示数量 ()
.计次循环首 (取数组成员数 (分组框), i)
.判断开始 (i ≥ 索引 且 i ≤ 索引 ＋ 显示数量)
.判断开始 (y ＝ 0)
分组框 [索引].顶边 ＝ 分组框_复制.顶边
分组框 [索引].左边 ＝ 分组框_复制.左边
分组框 [索引].可视 ＝ 真
.默认
计算y ＝ y － 1
分组框 [索引 ＋ 计算y].顶边 ＝ 分组框_复制.顶边
分组框 [索引 ＋ 计算y].左边 ＝ 分组框_复制.左边 ＋ 分组框_复制.宽度 × 计算y ＋ 20 × 计算y
分组框 [索引 ＋ 计算y].可视 ＝ 真
.判断结束
y ＝ y ＋ 1
.默认
分组框 [i].可视 ＝ 假
.判断结束

.计次循环尾 ()