| 窗口程序集名 | 保 留 | 保 留 | 备 注 |
| 窗口程序集_启动窗口 | | | |
| 变量名 | 类 型 | 数组 | 备 注 |
| 控件组 | 控件组 | 0 |
| 变量名 | 类 型 | 静态 | 数组 | 备 注 |
| 来源按钮 | 按钮 | | |
| 选项 | 整数型 | | |
| 来源索引 | 整数型 | | |
来源按钮 ＝
取事件组件 ()来源索引 ＝
到整数 (来源按钮.标记
)
判断 (控件组
[来源索引
].单选框组
[1
].选中
)
选项 ＝ 1
判断 (控件组
[来源索引
].单选框组
[2
].选中
)
选项 ＝ 2
判断 (控件组
[来源索引
].单选框组
[3
].选中
)
选项 ＝ 3
选项 ＝ 4
信息框 (取文本 (“来自第%d个控件组,%s”, 来源索引, 多项选择 (选项, “选择了第1个选项”, “选择了第2个选项”, “选择了第3个选项”, “没有选中”)), 0, “已选择选项”, _启动窗口)| 变量名 | 类 型 | 静态 | 数组 | 备 注 |
| 控件组数 | 整数型 | | |
| i | 整数型 | | |
| 控件顶边 | 整数型 | | |
控件组数 ＝
到整数 (编辑框1.内容
)重定义数组 (控件组, 假, 控件组数
)
计次循环首 (控件组数, i
)
控件顶边 ＝ 控件顶边 ＋ 60
复制窗口组件 (标签1, 控件组
[i
].标签
)控件组
[i
].标签.标题 ＝
“标签” ＋
到文本 (i
)控件组
[i
].标签.顶边 ＝ 控件顶边
控件组
[i
].标签.可视 ＝ 真
复制窗口组件 (分组框1, 控件组
[i
].分组框
)控件组
[i
].分组框.顶边 ＝ 控件顶边 － 16
控件组
[i
].分组框.可视 ＝ 真
复制窗口组件 (单选框_选项1, 控件组
[i
].单选框组
[1
])复制窗口组件 (单选框_选项2, 控件组
[i
].单选框组
[2
])复制窗口组件 (单选框_选项3, 控件组
[i
].单选框组
[3
]) 控件组
[i
].单选框组
[1
].
置父窗口 (控件组
[i
].分组框
)控件组
[i
].单选框组
[2
].
置父窗口 (控件组
[i
].分组框
)控件组
[i
].单选框组
[3
].
置父窗口 (控件组
[i
].分组框
)控件组
[i
].单选框组
[1
].可视 ＝ 真
控件组
[i
].单选框组
[2
].可视 ＝ 真
控件组
[i
].单选框组
[3
].可视 ＝ 真
复制窗口组件 (按钮_启动, 控件组
[i
].按钮
)控件组
[i
].按钮.标记 ＝
到文本 (i
)控件组
[i
].按钮.顶边 ＝ 控件顶边 － 6
控件组
[i
].按钮.可视 ＝ 真
计次循环尾 ()
