【原创】开源自定义列表支持窗口大小变化自动排列 使用 复制窗口组件 和 外形框 实现

bid

开源自定义列表支持窗口大小变化自动排列
使用 复制窗口组件 和 外形框实现
by: bid 原创

  

窗口程序集名	保 留	保 留	备 注
窗口程序集_启动窗口
变量名	类 型	数组	备 注
块列表	外形框	0
图片表	图片框	0
标签表	标签	0
按钮表	按钮	0
模板高	整数型
模板宽	整数型
模板距	整数型

子程序名	返回值类型	公开	备 注
__启动窗口_创建完毕

变量名	类 型	静态	数组	备 注
块	外形框
小图片	图片框
小窗口	窗口
小按钮	按钮
小标签	标签
i	整数型
行	整数型
计次	整数型
记宽	整数型

模板高 ＝ 外形框2.高度
模板宽 ＝ 外形框2.宽度
模板距 ＝ 2
外形框2.可视 ＝ 假
行 ＝ 0
计次 ＝ 0
变量循环首 (1, 8, 1, i)
复制窗口组件 (外形框2, 块)
复制窗口组件 (图片框1, 小图片)
复制窗口组件 (标签1, 小标签)
复制窗口组件 (按钮1, 小按钮)
如果真 (记宽 ＋ 模板宽 ＋ 模板距 ＞ 宽度)
行 ＝ 行 ＋ 1
计次 ＝ 0
记宽 ＝ 0

加入成员 (块列表, 块)
加入成员 (图片表, 小图片)
加入成员 (标签表, 小标签)
加入成员 (按钮表, 小按钮)
小图片.置父窗口 (块列表 [i])
小标签.置父窗口 (块列表 [i])
小按钮.置父窗口 (块列表 [i])
小图片.可视 ＝ 真
小标签.可视 ＝ 真
小按钮.可视 ＝ 真
标签表 [i].标题 ＝ “编号：” ＋ 到文本 (i)
按钮表 [i].标题 ＝ “变绿”
按钮表 [i].标记 ＝ 到文本 (i)
计次 ＝ 计次 ＋ 1
记宽 ＝ 记宽 ＋ 模板宽 ＋ 模板距
变量循环尾 ()

子程序名	返回值类型	公开	备 注
__启动窗口_尺寸被改变

变量名	类 型	静态	数组	备 注
i	整数型
行	整数型
计次	整数型
记宽	整数型

外形框1.高度 ＝ 高度 － 52
外形框1.宽度 ＝ 宽度 － 30
变量循环首 (1, 取数组成员数 (块列表), 1, i)
如果真 (记宽 ＋ 模板宽 ＋ 模板距 ＞ 宽度)
行 ＝ 行 ＋ 1
计次 ＝ 0
记宽 ＝ 0
块列表 [i].移动 ( (模板宽 ＋ 模板距) × 计次, (模板高 ＋ 模板距) × 行, 模板宽, 模板高)
块列表 [i].可视 ＝ 真
计次 ＝ 计次 ＋ 1
记宽 ＝ 记宽 ＋ 模板宽 ＋ 模板距
变量循环尾 ()

子程序名	返回值类型	公开	备 注
_按钮1_被单击

变量名	类 型	静态	数组	备 注
事件组件	按钮

事件组件 ＝ 取事件组件 ()
输出调试文本 (“-》” ＋ 事件组件.标记)
块列表 [到整数 (事件组件.标记)].背景颜色 ＝ #绿色

.版本 2<br /> <br /> .程序集 窗口程序集_启动窗口<br /> .程序集变量 块列表, 外形框, , "0"<br /> .程序集变量 图片表, 图片框, , "0"<br /> .程序集变量 标签表, 标签, , "0"<br /> .程序集变量 按钮表, 按钮, , "0"<br /> .程序集变量 模板高, 整数型<br /> .程序集变量 模板宽, 整数型<br /> .程序集变量 模板距, 整数型<br /> <br /> .子程序 __启动窗口_创建完毕<br /> .局部变量 块, 外形框<br /> .局部变量 小图片, 图片框<br /> .局部变量 小窗口, 窗口<br /> .局部变量 小按钮, 按钮<br /> .局部变量 小标签, 标签<br /> .局部变量 i, 整数型<br /> .局部变量 行, 整数型<br /> .局部变量 计次, 整数型<br /> .局部变量 记宽, 整数型<br /> <br /> <br /> 模板高 ＝ 外形框2.高度<br /> 模板宽 ＝ 外形框2.宽度<br /> 模板距 ＝ 2<br /> 外形框2.可视 ＝ 假<br /> <br /> 行 ＝ 0<br /> 计次 ＝ 0<br /> <br /> .变量循环首 (1, 8, 1, i)<br />     复制窗口组件 (外形框2, 块)<br />     复制窗口组件 (图片框1, 小图片)<br />     复制窗口组件 (标签1, 小标签)<br />     复制窗口组件 (按钮1, 小按钮)<br /> <br />     .如果真 (记宽 ＋ 模板宽 ＋ 模板距 ＞ 宽度)<br />         行 ＝ 行 ＋ 1<br />         计次 ＝ 0<br />         记宽 ＝ 0<br />     .如果真结束<br /> <br />     加入成员 (块列表, 块)<br />     加入成员 (图片表, 小图片)<br />     加入成员 (标签表, 小标签)<br />     加入成员 (按钮表, 小按钮)<br /> <br />     小图片.置父窗口 (块列表 <i>)<br />     小标签.置父窗口 (块列表 <i>)<br />     小按钮.置父窗口 (块列表 <i>)<br /> <br />     小图片.可视 ＝ 真<br />     小标签.可视 ＝ 真<br />     小按钮.可视 ＝ 真<br /> <br />     标签表 <i>.标题 ＝ “编号：” ＋ 到文本 (i)<br />     按钮表 <i>.标题 ＝ “变绿”<br />     按钮表 <i>.标记 ＝ 到文本 (i)<br /> <br />     计次 ＝ 计次 ＋ 1<br />     记宽 ＝ 记宽 ＋ 模板宽 ＋ 模板距<br /> .变量循环尾 ()<br /> <br /> <br /> .子程序 __启动窗口_尺寸被改变<br /> .局部变量 i, 整数型<br /> .局部变量 行, 整数型<br /> .局部变量 计次, 整数型<br /> .局部变量 记宽, 整数型<br /> <br /> 外形框1.高度 ＝ 高度 － 52<br /> 外形框1.宽度 ＝ 宽度 － 30<br /> <br /> .变量循环首 (1, 取数组成员数 (块列表), 1, i)<br />     .如果真 (记宽 ＋ 模板宽 ＋ 模板距 ＞ 宽度)<br />         行 ＝ 行 ＋ 1<br />         计次 ＝ 0<br />         记宽 ＝ 0<br />     .如果真结束<br />     块列表 <i>.移动 ((模板宽 ＋ 模板距) × 计次, (模板高 ＋ 模板距) × 行, 模板宽, 模板高)<br />     块列表 <i>.可视 ＝ 真<br />     计次 ＝ 计次 ＋ 1<br />     记宽 ＝ 记宽 ＋ 模板宽 ＋ 模板距<br /> <br /> <br /> .变量循环尾 ()<br /> <br /> <br /> .子程序 _按钮1_被单击<br /> .局部变量 事件组件, 按钮<br /> <br /> 事件组件 ＝ 取事件组件 ()<br /> 输出调试文本 (“-》” ＋ 事件组件.标记)<br /> 块列表 [到整数 (事件组件.标记)].背景颜色 ＝ #绿色

开源自定义列表支持窗口大小变化自动排列.e (7.54 KB, 下载次数: 458)

2018-12-31 22:38 上传

点击文件名下载附件

king0588

这个可以改装成很多 样式，感谢分享

king0588

感谢分享

1300886755

感谢分享

frewin110

感谢分享

kyo9766

这个可以改装成很多 样式，感谢分享

1184798949

感谢分享

小银鱼

大牛牛逼作品，感谢分享

w1285378872

66666666666666666666

huhuhuf

支持开源~！感谢分享

TIANL

学习学习，谢谢分享