创建文本同行编辑框支持自适应窗口

重定义数组 (复制编辑框组件, 假, 取数组成员数 (信息行))
父窗口宽 ＝ _启动窗口.取用户区宽度 ()
父组件编辑框.可视 ＝ 假
行个数 ＝ 取整 (父窗口宽 ÷ (编辑框宽 ＋ 行间距))
.计次循环首 (取数组成员数 (信息行), i)
复制窗口组件 (父组件编辑框, 复制编辑框组件 [i])
事件转移 (复制编辑框组件 [i], 父组件编辑框)
复制编辑框组件 [i].宽度 ＝ 编辑框宽
复制编辑框组件 [i].高度 ＝ 编辑框高
组件序 ＝ i
组件顶边 ＝ 开始顶边
.判断循环首 (组件序 ＞ 行个数)
组件序 ＝ 组件序 － 行个数
组件顶边 ＝ 组件顶边 ＋ 复制编辑框组件 [i].高度 ＋ 列间距
.判断循环尾 ()
组件左边 ＝ 开始左边 ＋ (复制编辑框组件 [i].宽度 ＋ 行间距) × (组件序 － 1)
复制编辑框组件 [i].左边 ＝ 组件左边
复制编辑框组件 [i].顶边 ＝ 组件顶边
复制编辑框组件 [i].可视 ＝ 真
复制编辑框组件 [i].内容 ＝ 信息行 [i]
复制编辑框组件 [i].标记 ＝ 到文本 (i)
.计次循环尾 ()