精易论坛

标题: 超级列表框问题刚刚没有解决 [打印本页]

作者: momoxiaofei    时间: 2025-1-15 14:20
标题: 超级列表框问题刚刚没有解决
  表框1的内容  比如A120列表1里有3行   把跟A120有关的几行内容 整理到列表2里为一行   每行的内容用一个符号隔开 方便后续分割



哪个会的 帮下忙~

作者: LWB666    时间: 2025-1-15 14:20
注意hashMap是无序的,所以排出来没有顺序

1.e

156.56 KB, 下载次数: 4


作者: 源于互联    时间: 2025-1-15 14:29
提示: 作者被禁止或删除 内容自动屏蔽
作者: chenboss    时间: 2025-1-15 14:31
源码上传看看
作者: momoxiaofei    时间: 2025-1-15 14:35
chenboss 发表于 2025-1-15 14:31
源码上传看看

.版本 2
.支持库 iext

.局部变量 i, 整数型
.局部变量 记录上个, 文本型

.计次循环首 (超级列表框1.取表项数 (), i)
    .如果 (记录上个 = 超级列表框1.取标题 (i - 1, 1))
        超级列表框2.置标题 (超级列表框2.取表项数 () - 1, 2, 超级列表框2.取标题 (超级列表框2.取表项数 () - 1, 2) + “$” + 超级列表框1.取标题 (i - 1, 2))
    .否则
        超级列表框2.插入表项 (, 到文本 (超级列表框2.取表项数 () + 1), , , , )
        超级列表框2.置标题 (超级列表框2.取表项数 () - 1, 1, 超级列表框1.取标题 (i - 1, 1))
        超级列表框2.置标题 (超级列表框2.取表项数 () - 1, 2, 超级列表框1.取标题 (i - 1, 2))
    .如果结束
    记录上个 = 超级列表框1.取标题 (i - 1, 1)
.计次循环尾 ()


'上个帖子 你发的
作者: LWB666    时间: 2025-1-15 14:37
momoxiaofei 发表于 2025-1-15 14:35
.版本 2
.支持库 iext

这个只能把相邻的和一块
作者: chenboss    时间: 2025-1-15 14:39
momoxiaofei 发表于 2025-1-15 14:35
.版本 2
.支持库 iext

测试正常,不知道你的情况


作者: LWB666    时间: 2025-1-15 14:39
LWB666 发表于 2025-1-15 14:32
注意hashMap是无序的,所以排出来没有顺序

忘记上模块了
https://125.confly.eu.org/forum.php?mod ... 8%E5%B8%8C%E8%A1%A8
作者: momoxiaofei    时间: 2025-1-15 14:41
chenboss 发表于 2025-1-15 14:39
测试正常,不知道你的情况

  测试以后少一行~

作者: chenboss    时间: 2025-1-15 14:46
momoxiaofei 发表于 2025-1-15 14:41
测试以后少一行~

我发的第二条修复了这个问题,代码漏了一行,你看源码对不对的上
作者: chenboss    时间: 2025-1-15 14:46
本帖最后由 chenboss 于 2025-1-15 14:51 编辑

这行加上去就正常了


作者: momoxiaofei    时间: 2025-1-15 14:48
LWB666 发表于 2025-1-15 14:39
忘记上模块了
https://125.confly.eu.org/forum.php?mod=viewthread&tid=14516715&highlight=%E5%93%88%E5%B8%8C ...

的确解决了 唯一就是没排序
作者: aipca    时间: 2025-1-15 14:53

  
窗口程序集名保 留  保 留备 注
窗口程序集_启动窗口   
子程序名返回值类型公开备 注
__启动窗口_创建完毕  
变量名类 型静态数组备 注
i整数型 
索引整数型 
置随机数种子 ()
计次循环首 (取随机数 (20, 30), i)
索引 = 超级列表框1.插入表项 (, , , , , )
超级列表框1.置标题 (索引, 0, 到文本 (i))
超级列表框1.置标题 (索引, 1, “A”到文本 (取随机数 (12, 15) × 10))
超级列表框1.置标题 (索引, 2, 取随机数 (1200000000, 1500000000))
计次循环尾 ()
子程序名返回值类型公开备 注
_按钮1_被单击  
变量名类 型静态数组备 注
节点节点 
计次整数型 
表项索引整数型 
文本值文本型 
超级列表框2.全部删除 ()
计次循环首 (超级列表框1.取表项数 (), 计次)
判断 (节点.加入属性 (超级列表框1.取标题 (计次 - 1, 1), 到文本 (超级列表框2.取表项数 ())))
表项索引 = 超级列表框2.插入表项 (, 到文本 (超级列表框2.取表项数 () + 1), , , , )
超级列表框2.置标题 (表项索引, 1, 超级列表框1.取标题 (计次 - 1, 1))
超级列表框2.置标题 (表项索引, 2, 超级列表框1.取标题 (计次 - 1, 2))
节点.取文本值 (超级列表框1.取标题 (计次 - 1, 1), 文本值)
超级列表框2.置标题 (到整数 (文本值), 2, 超级列表框2.取标题 (到整数 (文本值), 2)“&” + 超级列表框1.取标题 (计次 - 1, 2))

计次循环尾 ()


i支持库列表   支持库注释   
iext扩展界面支持库一
EDataStructure数据结构支持库

超级列表合并.e

150.74 KB, 下载次数: 2


作者: chenboss    时间: 2025-1-15 14:57
你复制错了,我发了两个
  
变量名类 型静态数组备 注
i整数型 
记录上个文本型 
计次循环首 (超级列表框1.取表项数 (), i)
如果 (记录上个 = 超级列表框1.取标题 (i - 1, 1))
超级列表框2.置标题 (超级列表框2.取表项数 () - 1, 2, 超级列表框2.取标题 (超级列表框2.取表项数 () - 1, 2)“$” + 超级列表框1.取标题 (i - 1, 2))
超级列表框2.插入表项 (, 到文本 (超级列表框2.取表项数 () + 1), , , , )
超级列表框2.置标题 (超级列表框2.取表项数 () - 1, 1, 超级列表框1.取标题 (i - 1, 1))
超级列表框2.置标题 (超级列表框2.取表项数 () - 1, 2, 超级列表框1.取标题 (i - 1, 2))
记录上个 = 超级列表框1.取标题 (i - 1, 1)
计次循环尾 ()


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


作者: momoxiaofei    时间: 2025-1-15 15:04
chenboss 发表于 2025-1-15 14:46
我发的第二条修复了这个问题,代码漏了一行,你看源码对不对的上

对不上 还是要一行数据
作者: chenboss    时间: 2025-1-15 15:09
你试试这个跟截图对不对的上
1.e (6.41 KB, 下载次数: 2)







欢迎光临 精易论坛 (https://125.confly.eu.org/) Powered by Discuz! X3.4