窗口改变时自动排列按钮组件改怎么写啊？

wbin502

想做个可以在窗口改变尺寸时窗口里的按钮可以自动根据窗口的大小来排列，按钮的大小都是一样的。
举个例子吧，我用了16个大小为50*50的按钮，在窗口足够宽的时候这些按钮会自动排成一行，并且定边都是0。当窗口慢慢变窄，小于16个按钮的宽度时最后一个按钮会排到第二行的第一个位置。也就是左边为0顶边为50，窗口继续变小，按钮就自动的往下排，不能覆盖。
应该可以看的明白的吧。研究2天了。把一些自己不熟悉的命令都用熟练了，结果还是没做出来。我只实现了部分功能。根本达不到自己的 要求。
请大家帮帮忙。精币显少了可以再加。

.版本 2

.程序集 窗口程序集1
.程序集变量 按钮大小, 字节型
.程序集变量 按钮到边框距离, 字节型
.程序集变量 按钮组件数组, 按钮, , "0"

.子程序 __启动窗口_创建完毕
.局部变量 计次, 整数型
.局部变量 局部_按钮, 按钮

按钮大小 ＝ 52
按钮到边框距离 ＝ 8
.计次循环首 (16, 计次)
    复制窗口组件 (按钮1, 局部_按钮)
    加入成员 (按钮组件数组, 局部_按钮)
    按钮组件数组 [计次].左边 ＝ 按钮大小 × (计次 － 1)
    按钮组件数组 [计次].标题 ＝ “按钮” ＋ #换行符 ＋ 到文本 (计次)
    按钮组件数组 [计次].可视 ＝ 真
.计次循环尾 ()
_启动窗口.宽度 ＝ 52 × 16 ＋ 2 × 按钮到边框距离
_启动窗口.刷新显示 ()

.子程序 __启动窗口_尺寸被改变
.局部变量 按钮横排数, 字节型
.局部变量 按钮纵排数, 字节型
.局部变量 计次_横, 整数型
.局部变量 计次_纵, 整数型

按钮横排数 ＝ (_启动窗口.宽度 － 2 × 按钮到边框距离) ＼ 按钮大小
按钮纵排数 ＝ 16 ＼ 按钮横排数
.计次循环首 (按钮纵排数, 计次_纵)
    .计次循环首 (按钮横排数, 计次_横)
        按钮组件数组 [(计次_纵 － 1) × 按钮横排数 ＋ 计次_横].左边 ＝ 按钮大小 × (计次_横 － 1)
        按钮组件数组 [(计次_纵 － 1) × 按钮横排数 ＋ 计次_横].顶边 ＝ 按钮大小 × (计次_纵 － 1)
    .计次循环尾 ()
.计次循环尾 ()
.计次循环首 (16 ％ 按钮横排数, 计次_横)
    按钮组件数组 [(计次_纵 － 1) × 按钮横排数 ＋ 计次_横].左边 ＝ 按钮大小 × (计次_横 － 1)
    按钮组件数组 [(计次_纵 － 1) × 按钮横排数 ＋ 计次_横].顶边 ＝ 按钮大小 × (计次_纵 － 1)
.计次循环尾 ()
_启动窗口.刷新显示 ()

airpppp

俺也是新人!
占位来学习之

huang1021

先占个位置来学习{:3_43:}

应该只需要窗口刷新就可以了吧，怎么排根据窗口宽度算了。

wbin502

楼上的说的轻巧，我也知道要计算宽度啊，可就是实现不了 啊。会了就麻烦你写个代码吧。谢谢了！

wbin502

这个代码很不错！十分感谢xcyach！