关于高级列表数据存储的问题

一介莽夫

      第一个目录中存有一条内容，第二个目录中存有两条内容。我想在点击第一个目录时显示里面的内容，再点第二个目录时显示第二个目录中的内容。如果能把数据存到本地最好

  

窗口程序集名	保 留	保 留	备 注
窗口程序集_启动窗口
变量名	类 型	数组	备 注
集_上次选择行	整数型
高级列表框数据类型	高级列表框数据类型	0

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

超级列表框初始化 ()
高级表格_目录_初始化 ()
高级表格_内容_初始化 ()

子程序名	返回值类型	公开	备 注
高级表格_目录_初始化

高级表格_目录.行数 ＝ 1
高级表格_目录.列数 ＝ 4
高级表格_目录.表头行数 ＝ 1
高级表格_目录.表头列数 ＝ 0
高级表格_目录.置列宽 (1, 80)
高级表格_目录.置数据 (0, 0, #表格常量 .文本型, “目录”)
高级表格_目录.置数据 (0, 1, #表格常量 .文本型, “目录名称”)
高级表格_目录.置数据 (0, 2, #表格常量 .文本型, “数值”)
高级表格_目录.置列类型 (0, #表格常量 .组件型)
高级表格_目录.置列类型 (1, #表格常量 .文本型)
高级表格_目录.置列类型 (2, #表格常量 .数值型)

子程序名	返回值类型	公开	备 注
高级表格_内容_初始化

高级表格_内容.选择整行 ＝ 真
高级表格_内容.行数 ＝ 1
高级表格_内容.列数 ＝ 6
高级表格_内容.表头行数 ＝ 1
高级表格_内容.表头列数 ＝ 0
高级表格_内容.置列宽 (0, 600)
高级表格_内容.置列宽 (1, 75)
高级表格_内容.置列宽 (2, 35)
高级表格_内容.置列宽 (3, 35)
高级表格_内容.置列宽 (4, 35)
高级表格_内容.置列宽 (5, 35)
高级表格_内容.置数据 (0, 0, #表格常量 .文本型, “内容”)
高级表格_内容.置数据 (0, 1, #表格常量 .文本型, “必选”)
高级表格_内容.置数据 (0, 2, #表格常量 .文本型, “值1”)
高级表格_内容.置数据 (0, 3, #表格常量 .文本型, “值2”)
高级表格_内容.置数据 (0, 4, #表格常量 .文本型, “值3”)
高级表格_内容.置数据 (0, 5, #表格常量 .文本型, “值4”)
高级表格_内容.置列类型 (0, #表格常量 .组件型)
高级表格_内容.置列类型 (1, #表格常量 .组件型)
高级表格_内容.置列类型 (2, #表格常量 .数值型)
高级表格_内容.置列类型 (3, #表格常量 .数值型)
高级表格_内容.置列类型 (4, #表格常量 .数值型)
高级表格_内容.置列类型 (5, #表格常量 .数值型)

子程序名	返回值类型	公开	备 注
超级列表框初始化

变量名	类 型	静态	数组	备 注
i	整数型
索引	整数型

计次循环首 (15, i)
索引 ＝ 超级列表框1.插入表项 (, , , , , )
超级列表框1.置标题 (索引, 0, “这是文本内容 ” ＋ 到文本 (i) ＋ “，双击加入”)
计次循环尾 ()

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

变量名	类 型	静态	数组	备 注
开关按钮	表格开关按钮
i	整数型

开关按钮.默认标题 ＝ “关”
开关按钮.选中标题 ＝ “开”
高级表格_目录.行数 ＝ 高级表格_目录.行数 ＋ 1
高级表格_目录.置数据 (高级表格_目录.行数 － 1, 0, #表格常量 .组件型, 开关按钮)
高级表格_目录.置数据 (高级表格_目录.行数 － 1, 1, #表格常量 .文本型, “默认名字”)

子程序名	返回值类型	公开	备 注
_超级列表框1_被双击	逻辑型
参数名	类 型	参考	可空	数组	备 注
横向位置	整数型
纵向位置	整数型
功能键状态	整数型

如果真 (高级表格_目录.行数 ＜ 2)
信息框 (“先添加目录”, 0, , )
返回 ()
如果真 (高级表格_目录.取选择起始行 () ≤ 0)
信息框 (“先选择你要加内容的目录”, 0, , )
返回 ()
高级表格_内容_加入内容 (超级列表框1.取标题 (超级列表框1.现行选中项, 0))

子程序名	返回值类型	公开	备 注
高级表格_内容_加入内容
参数名	类 型	参考	可空	数组	备 注
内容	文本型

变量名	类 型	静态	数组	备 注
选择按钮	表格选择按钮
词缀按钮	表格选择按钮

词缀按钮.标题 ＝ 内容
词缀按钮.选中 ＝ 真
选择按钮.标题 ＝ “必须满足”
选择按钮.选中 ＝ 假
高级表格_内容.行数 ＝ 高级表格_内容.行数 ＋ 1
高级表格_内容.置数据 (高级表格_内容.行数 － 1, 0, #表格常量 .组件型, 词缀按钮)
高级表格_内容.置数据 (高级表格_内容.行数 － 1, 1, #表格常量 .组件型, 选择按钮)

子程序名	返回值类型	公开	备 注
_高级表格_目录_光标位置改变

如果真 (集_上次选择行 ＞ 0)  ' 从这里开始就感觉和预想的不一样了
保存内容 (集_上次选择行)
集_上次选择行 ＝ 高级表格_目录.取选择起始行 ()
读取内容 (集_上次选择行)

子程序名	返回值类型	公开	备 注
保存内容
参数名	类 型	参考	可空	数组	备 注
索引	整数型

变量名	类 型	静态	数组	备 注
内容临时数据	字节集
i	整数型
行数	整数型
临时	高级列表框数据类型

内容临时数据 ＝ 高级表格_内容.存到字节集 ()
行数 ＝ 高级表格_内容.行数
临时.内容 ＝ 内容临时数据
临时.数量 ＝ 行数
加入成员 (高级列表框数据类型, 临时)
计次循环首 (行数 － 1, i)
高级表格_内容.删除行 (行数 － i)
计次循环尾 ()

子程序名	返回值类型	公开	备 注
读取内容
参数名	类 型	参考	可空	数组	备 注
索引	整数型

变量名	类 型	静态	数组	备 注
i	整数型

计次循环首 (取数组成员数 (高级列表框数据类型), i)
如果真 (i ＝ 索引)
高级表格_内容.行数 ＝ 高级列表框数据类型 [i].数量
高级表格_内容.从字节集读 (高级列表框数据类型 [i].内容)  ' 感觉这一条没起到作用

计次循环尾 ()

i支持库列表	支持库注释
eGrid	高级表格支持库
iext	扩展界面支持库一

.版本 2<br /> .支持库 eGrid<br /> .支持库 iext<br /> <br /> .程序集 窗口程序集_启动窗口<br /> .程序集变量 集_上次选择行, 整数型<br /> .程序集变量 高级列表框数据类型, 高级列表框数据类型, , "0"<br /> <br /> .子程序 __启动窗口_创建完毕<br /> <br /> <br /> 超级列表框初始化 ()<br /> 高级表格_目录_初始化 ()<br /> 高级表格_内容_初始化 ()<br /> <br /> .子程序 高级表格_目录_初始化<br /> <br /> 高级表格_目录.行数 ＝ 1<br /> 高级表格_目录.列数 ＝ 4<br /> 高级表格_目录.表头行数 ＝ 1<br /> 高级表格_目录.表头列数 ＝ 0<br /> 高级表格_目录.置列宽 (1, 80)<br /> <br /> 高级表格_目录.置数据 (0, 0, #表格常量.文本型, “目录”)<br /> 高级表格_目录.置数据 (0, 1, #表格常量.文本型, “目录名称”)<br /> 高级表格_目录.置数据 (0, 2, #表格常量.文本型, “数值”)<br /> <br /> 高级表格_目录.置列类型 (0, #表格常量.组件型)<br /> 高级表格_目录.置列类型 (1, #表格常量.文本型)<br /> 高级表格_目录.置列类型 (2, #表格常量.数值型)<br /> <br /> <br /> .子程序 高级表格_内容_初始化<br /> <br /> 高级表格_内容.选择整行 ＝ 真<br /> 高级表格_内容.行数 ＝ 1<br /> 高级表格_内容.列数 ＝ 6<br /> 高级表格_内容.表头行数 ＝ 1<br /> 高级表格_内容.表头列数 ＝ 0<br /> 高级表格_内容.置列宽 (0, 600)<br /> 高级表格_内容.置列宽 (1, 75)<br /> 高级表格_内容.置列宽 (2, 35)<br /> 高级表格_内容.置列宽 (3, 35)<br /> 高级表格_内容.置列宽 (4, 35)<br /> 高级表格_内容.置列宽 (5, 35)<br /> <br /> 高级表格_内容.置数据 (0, 0, #表格常量.文本型, “内容”)<br /> 高级表格_内容.置数据 (0, 1, #表格常量.文本型, “必选”)<br /> 高级表格_内容.置数据 (0, 2, #表格常量.文本型, “值1”)<br /> 高级表格_内容.置数据 (0, 3, #表格常量.文本型, “值2”)<br /> 高级表格_内容.置数据 (0, 4, #表格常量.文本型, “值3”)<br /> 高级表格_内容.置数据 (0, 5, #表格常量.文本型, “值4”)<br /> 高级表格_内容.置列类型 (0, #表格常量.组件型)<br /> 高级表格_内容.置列类型 (1, #表格常量.组件型)<br /> 高级表格_内容.置列类型 (2, #表格常量.数值型)<br /> 高级表格_内容.置列类型 (3, #表格常量.数值型)<br /> 高级表格_内容.置列类型 (4, #表格常量.数值型)<br /> 高级表格_内容.置列类型 (5, #表格常量.数值型)<br /> <br /> .子程序 超级列表框初始化<br /> .局部变量 i, 整数型<br /> .局部变量 索引, 整数型<br /> <br /> .计次循环首 (15, i)<br />     索引 ＝ 超级列表框1.插入表项 (, , , , , )<br />     超级列表框1.置标题 (索引, 0, “这是文本内容 ” ＋ 到文本 (i) ＋ “，双击加入”)<br /> .计次循环尾 ()<br /> <br /> <br /> <br /> .子程序 _按钮_添加_被单击<br /> .局部变量 开关按钮, 表格开关按钮<br /> .局部变量 i, 整数型<br /> <br /> 开关按钮.默认标题 ＝ “关”<br /> 开关按钮.选中标题 ＝ “开”<br /> 高级表格_目录.行数 ＝ 高级表格_目录.行数 ＋ 1<br /> 高级表格_目录.置数据 (高级表格_目录.行数 － 1, 0, #表格常量.组件型, 开关按钮)<br /> 高级表格_目录.置数据 (高级表格_目录.行数 － 1, 1, #表格常量.文本型, “默认名字”)<br /> <br /> .子程序 _超级列表框1_被双击, 逻辑型<br /> .参数 横向位置, 整数型<br /> .参数 纵向位置, 整数型<br /> .参数 功能键状态, 整数型<br /> <br /> .如果真 (高级表格_目录.行数 ＜ 2)<br />     信息框 (“先添加目录”, 0, , )<br />     返回 ()<br /> .如果真结束<br /> .如果真 (高级表格_目录.取选择起始行 () ≤ 0)<br />     信息框 (“先选择你要加内容的目录”, 0, , )<br />     返回 ()<br /> .如果真结束<br /> 高级表格_内容_加入内容 (超级列表框1.取标题 (超级列表框1.现行选中项, 0))<br /> <br /> <br /> <br /> .子程序 高级表格_内容_加入内容<br /> .参数 内容, 文本型<br /> .局部变量 选择按钮, 表格选择按钮<br /> .局部变量 词缀按钮, 表格选择按钮<br /> <br /> 词缀按钮.标题 ＝ 内容<br /> 词缀按钮.选中 ＝ 真<br /> 选择按钮.标题 ＝ “必须满足”<br /> 选择按钮.选中 ＝ 假<br /> 高级表格_内容.行数 ＝ 高级表格_内容.行数 ＋ 1<br /> 高级表格_内容.置数据 (高级表格_内容.行数 － 1, 0, #表格常量.组件型, 词缀按钮)<br /> 高级表格_内容.置数据 (高级表格_内容.行数 － 1, 1, #表格常量.组件型, 选择按钮)<br /> <br /> .子程序 _高级表格_目录_光标位置改变<br /> <br /> .如果真 (集_上次选择行 ＞ 0)  ' 从这里开始就感觉和预想的不一样了<br />     保存内容 (集_上次选择行)<br /> .如果真结束<br /> 集_上次选择行 ＝ 高级表格_目录.取选择起始行 ()<br /> 读取内容 (集_上次选择行)<br /> <br /> <br /> .子程序 保存内容<br /> .参数 索引, 整数型<br /> .局部变量 内容临时数据, 字节集<br /> .局部变量 i, 整数型<br /> .局部变量 行数, 整数型<br /> .局部变量 临时, 高级列表框数据类型<br /> <br /> 内容临时数据 ＝ 高级表格_内容.存到字节集 ()<br /> 行数 ＝ 高级表格_内容.行数<br /> 临时.内容 ＝ 内容临时数据<br /> 临时.数量 ＝ 行数<br /> 加入成员 (高级列表框数据类型, 临时)<br /> <br /> .计次循环首 (行数 － 1, i)<br />     高级表格_内容.删除行 (行数 － i)<br /> .计次循环尾 ()<br /> <br /> <br /> <br /> .子程序 读取内容<br /> .参数 索引, 整数型<br /> .局部变量 i, 整数型<br /> <br /> <br /> .计次循环首 (取数组成员数 (高级列表框数据类型), i)<br />     .如果真 (i ＝ 索引)<br />         高级表格_内容.行数 ＝ 高级列表框数据类型 <i>.数量<br />         高级表格_内容.从字节集读 (高级列表框数据类型 <i>.内容)  ' 感觉这一条没起到作用<br />     .如果真结束<br /> <br /> .计次循环尾 ()

走一回

一介莽夫 发表于 2025-5-16 06:17
大哥你可能理解错我意思了 ,我是需要 最右边的地方 也可以保存组件.目前发现这个高级列表框没办弄.也不知 ...

楼上一层就是答案，只是没有“开关”组件了，因为这个表格里的组件是真的不能保存下来，如果真想保存下来，可能 这个新版的高级表格支持库还要再升级，或是通过额外的配置文件什么的来记录下来“开关”组件的信息。所以在6楼我用了易语言自带的高级表格的基本功能：高级表格 中的 选择框，这个选择框是能保存下来的。当然最左侧的表格里没有把选择框做进去，只需要模仿  目录表格  就行了。

一介莽夫

支持库下载地址 ： https://bbs.125.la/forum.php?mod ... F%E6%8C%81%E5%BA%93

cunanhai

只能说 论坛里能理解你要求的人几乎没有

一介莽夫

就是想达到这个效果。我刚刚把里面的组件取消了 ，可以用，但是我需要组件也在里面

走一回

你的要求就是树型框，就能很好的实现，或是类似于级联菜单什么的，不过是用到的别的第三方模块或组件而已。

补充内容 (2025-5-15 22:42):
再者看动画，你自己都已经实现了的呀

补充内容 (2025-5-15 23:21):
高级表格归左侧的组件列，无法保存  开或关，或许可能用超级列表框加检查框属性来代替

补充内容 (2025-5-15 23:26):
说高级表格的新支持库只是一次性显示 ，没有完整保存表格所有信息的功能，只能通过别的指令来保存”开关“的信息，并且要按行号来保持一致性

补充内容 (2025-5-15 23:51):
建议还是用易语言自带的高级表格功能中的单元格类型，这样就可以通过  取逻辑值  来实现你的功能了。

走一回

22.e (7.28 KB, 下载次数: 2)

2025-5-16 01:17 上传

点击文件名下载附件 调试时记得删除文件夹里输出的文本文件

能保存，能载入。
显示不显示 ，请自行修改。

一介莽夫

走一回 发表于 2025-5-15 22:41
你的要求就是树型框，就能很好的实现，或是类似于级联菜单什么的，不过是用到的别的第三方模块或组件而已。 ...

大哥你可能理解错我意思了 ,我是需要 最右边的地方 也可以保存组件.目前发现这个高级列表框没办弄.也不知道有没有其它好用的编辑框