demo.e (5.14 KB, 下载次数: 3)

2025-3-23 10:20 上传

点击文件名下载附件

补充内容 (2025-3-23 10:22):
考虑到后续的数据，采用的是自定义数据类型，具体可以后续再细化一下ID和时间

补充内容 (2025-3-23 10:22):
可以尝试联动组合框

12.e (4.1 KB, 下载次数: 1)

2025-3-23 10:16 上传

点击文件名下载附件

这样吗?


补充内容 (2025-3-23 10:18):
把插入改成插入 － 1

  

窗口程序集名	保 留	保 留	备 注
窗口程序集_启动窗口

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

变量名	类 型	静态	数组	备 注
i	整数型
单条数据	文本型		0
整条数据	文本型		0
表项	整数型
数据统计	数据类型1		0
ii	整数型
成员是否存在	逻辑型
真假	逻辑型

整条数据 ＝ 分割文本 ( #常量1, #换行符, )
计次循环首 (取数组成员数 (整条数据), i)
单条数据 ＝ 分割文本 (整条数据 [i], “----”, )
计次循环首 (取数组成员数 (数据统计), ii)
成员是否存在 ＝ 假
如果真 (数据统计 [ii].名称 ＝ 单条数据 [1])
数据统计 [ii].数量 ＝ 数据统计 [ii].数量 ＋ 1
成员是否存在 ＝ 真
跳出循环 ()

计次循环尾 ()
如果真 (成员是否存在 ＝ 假)
重定义数组 (数据统计, 真, 取数组成员数 (数据统计) ＋ 1)
数据统计 [取数组成员数 (数据统计)].名称 ＝ 单条数据 [1]
数据统计 [取数组成员数 (数据统计)].ID ＝ 到整数 (单条数据 [2])
数据统计 [取数组成员数 (数据统计)].数量 ＝ 1
数据统计 [取数组成员数 (数据统计)].时间 ＝ 单条数据 [3]

计次循环尾 ()
计次循环首 (取数组成员数 (数据统计), i)
表项 ＝ 超级列表框1.插入表项 (, , , , , )
超级列表框1.置标题 (表项, 0, i)
超级列表框1.置标题 (表项, 1, 数据统计 [i].名称)
超级列表框1.置标题 (表项, 2, 到文本 (数据统计 [i].数量))
超级列表框1.置标题 (表项, 3, 到文本 (数据统计 [i].ID))
超级列表框1.置标题 (表项, 4, 数据统计 [i].时间)
计次循环尾 ()

i支持库列表	支持库注释
iext	扩展界面支持库一

.版本 2<br /> .支持库 iext<br /> <br /> .程序集 窗口程序集_启动窗口<br /> <br /> .子程序 __启动窗口_创建完毕<br /> .局部变量 i, 整数型<br /> .局部变量 单条数据, 文本型, , "0"<br /> .局部变量 整条数据, 文本型, , "0"<br /> .局部变量 表项, 整数型<br /> .局部变量 数据统计, 数据类型1, , "0"<br /> .局部变量 ii, 整数型<br /> .局部变量 成员是否存在, 逻辑型<br /> .局部变量 真假, 逻辑型<br /> <br /> 整条数据 ＝ 分割文本 (#常量1, #换行符, )<br /> .计次循环首 (取数组成员数 (整条数据), i)<br />     单条数据 ＝ 分割文本 (整条数据 <i>, “----”, )<br />     .计次循环首 (取数组成员数 (数据统计), ii)<br />         成员是否存在 ＝ 假<br />         .如果真 (数据统计 [ii].名称 ＝ 单条数据 [1])<br />             数据统计 [ii].数量 ＝ 数据统计 [ii].数量 ＋ 1<br />             成员是否存在 ＝ 真<br />             跳出循环 ()<br />         .如果真结束<br /> <br />     .计次循环尾 ()<br />     .如果真 (成员是否存在 ＝ 假)<br />         重定义数组 (数据统计, 真, 取数组成员数 (数据统计) ＋ 1)<br />         数据统计 [取数组成员数 (数据统计)].名称 ＝ 单条数据 [1]<br />         数据统计 [取数组成员数 (数据统计)].ID ＝ 到整数 (单条数据 [2])<br />         数据统计 [取数组成员数 (数据统计)].数量 ＝ 1<br />         数据统计 [取数组成员数 (数据统计)].时间 ＝ 单条数据 [3]<br />     .如果真结束<br /> <br /> .计次循环尾 ()<br /> .计次循环首 (取数组成员数 (数据统计), i)<br />     表项 ＝ 超级列表框1.插入表项 (, , , , , )<br />     超级列表框1.置标题 (表项, 0, i)<br />     超级列表框1.置标题 (表项, 1, 数据统计 <i>.名称)<br />     超级列表框1.置标题 (表项, 2, 到文本 (数据统计 <i>.数量))<br />     超级列表框1.置标题 (表项, 3, 到文本 (数据统计 <i>.ID))<br />     超级列表框1.置标题 (表项, 4, 数据统计 <i>.时间)<br /> .计次循环尾 ()