窗口排版窗口

窗口数组 ＝ 取所有窗口列表 ()
.计次循环首 (取数组成员数 (窗口数组), t)
窗口类 ＝ 取窗口类名 (到整数 (窗口数组 [t]))
标题y ＝ 窗口_取标题 (到整数 (窗口数组 [t]))
编辑框4.加入文本 (窗口类 ＋ “--” ＋ 标题y ＋ #换行符 ＋ #换行符 ＋ #换行符)
.如果真 (编辑框3.内容 ≠ “”)
.如果真 (窗口类 ＝ 删首尾空 (编辑框3.内容) 且 本窗口 ≠ 到整数 (窗口数组 [t]))
d ＝ d ＋ 1
.如果真结束
.如果真 (窗口类 ＝ 删首尾空 (编辑框3.内容) 且 本窗口 ≠ 到整数 (窗口数组 [t]))
k ＝ 到整数 (编辑框1.内容)
g ＝ 到整数 (编辑框2.内容)
.如果真 (d ＝ 1)
窗口_置位置和大小 (到整数 (窗口数组 [t]), 2, 2, k, g)
.如果真结束
.如果真 (d ＝ 2)
窗口_置位置和大小 (到整数 (窗口数组 [t]), 2 ＋ k, 2, k, g)
.如果真结束
.如果真 (d ＝ 3)
窗口_置位置和大小 (到整数 (窗口数组 [t]), 2 ＋ k ＋ k, 2, k, g)
.如果真结束
.如果真 (d ＝ 4)
窗口_置位置和大小 (到整数 (窗口数组 [t]), 2, 取屏幕高度 () ÷ 2 － 14, k, g)
.如果真结束
.如果真 (d ＝ 5)
窗口_置位置和大小 (到整数 (窗口数组 [t]), 2 ＋ k, 取屏幕高度 () ÷ 2 － 14, k, g)
.如果真结束
.如果真 (d ＝ 6)
窗口_置位置和大小 (到整数 (窗口数组 [t]), 2 ＋ k ＋ k, 取屏幕高度 () ÷ 2 － 14, k, g)
.如果真结束

.如果真结束

.如果真结束

.计次循环尾 ()