|
分享源码
界面截图: |
- |
是否带模块: |
纯源码 |
备注说明: |
- |
本帖最后由 吴亚杰 于 2020-3-16 12:46 编辑
闲着无聊 看看还需要哪些功能!!请多多给予意见!!
做一下小修改 完善一下
.版本 2
.子程序 销毁组件
.局部变量 n, 整数型
.计次循环首 (取数组成员数 (按钮), n)
.如果 (是否已创建 (按钮 [n]) = 真)
按钮 [n].销毁 ()
.否则
' 跳出循环 () 把跳出循环去掉
.如果结束
.计次循环尾 ()
重定义数组 (按钮, 假, 0)
.版本 2
.支持库 iext2
.子程序 添加组件
.局部变量 n, 整数型
.局部变量 a, 整数型
.局部变量 临时_标题, 文本型
.局部变量 组件顶边, 整数型
.局部变量 按钮图标, 字节集
.局部变量 组件左边, 整数型
打开 (取运行目录 () + “\配置.edb”, , , , , , )
到首记录 ()
组件顶边 = 10
.计次循环首 (取记录数 (), n)
临时_标题 = 读 (3)
按钮图标 = 读 (2)
.如果真 (组件左边 = 组件)
a = 0
组件顶边 = 组件顶边 + 40
组件左边 = 0
.如果真结束
a = a + 1
组件左边 = 80 × a - 80 + 2
加入成员 (按钮, 按钮1) ' 修改一下 按钮数组可以写0
复制窗口组件 (按钮1, 按钮 [n])
按钮 [n].标题 = 临时_标题
按钮 [n].通常图片 = 按钮图标
按钮 [n].左边 = 组件左边
按钮 [n].顶边 = 组件顶边
按钮 [n].可视 = 真
跳过 ()
.计次循环尾 ()
关闭 ()
|
-
-
游戏菜单.zip
47.13 KB, 下载次数: 81, 下载积分: 精币 -2 枚
|