|

楼主 |
发表于 2025-1-20 16:23:49
|
显示全部楼层
安徽省淮南市
圆圈 发表于 2025-1-20 15:46
[/quote ]按照你的思路 计次里面再分割一次可以全部分割出来 但是最后 下标错误了 帮忙看看哪里问题 [e=0 ].版本 2 窗口程序集名 | 保 留 | 保 留 | 备 注 | 窗口程序集_启动窗口 | | | |
变量名 | 类 型 | 静态 | 数组 | 备 注 | 文本 | 文本型 | | | 文本组 | 文本型 | | 0 | aa | 整数型 | | | 索引 | 整数型 | | | 数组1 | 文本型 | | 0 |
超级列表框1. 全部删除 ()文本 = 编码_Utf8到Ansi (读入文件 (a )) 文本_分割文本 (文本组, 文本, #换行符, ) 计次循环首 (取数组成员数 (文本组 ), aa ) 数组1 = 分割文本 (文本组 [aa ], “----”, ) 索引 = 超级列表框1. 插入表项 (, , , , , ) 超级列表框1. 置标题 (索引, 0, 数组1 [1 ]) 超级列表框1. 置标题 (索引, 1, 数组1 [3 ]) 超级列表框1. 置标题 (索引, 2, 数组1 [8 ]) 计次循环尾 ()a = 接收到的文件路径 拖放对象1. 注册拖放控件 (_启动窗口. 取窗口句柄 ())
按照你的思路 计次里面再分割一次可以全部分割出来 但是最后 下标错误了
帮忙看看哪里问题
[e=0].版本 2
.支持库 iext
.支持库 edroptarget
.程序集 窗口程序集_启动窗口
.子程序 _按钮1_被单击
.局部变量 文本, 文本型
.局部变量 文本组, 文本型, , "0"
.局部变量 aa, 整数型
.局部变量 索引, 整数型
.局部变量 数组1, 文本型, , "0"
超级列表框1.全部删除 ()
文本 = 编码_Utf8到Ansi (读入文件 (a))
文本_分割文本 (文本组, 文本, #换行符, )
.计次循环首 (取数组成员数 (文本组), aa)
数组1 = 分割文本 (文本组 [aa], “----”, )
索引 = 超级列表框1.插入表项 (, , , , , )
超级列表框1.置标题 (索引, 0, 数组1 [1])
超级列表框1.置标题 (索引, 1, 数组1 [3])
超级列表框1.置标题 (索引, 2, 数组1 [8])
.计次循环尾 ()
.子程序 _拖放对象1_得到文件
.参数 接收到的文件路径, 文本型
a = 接收到的文件路径
.子程序 __启动窗口_创建完毕
拖放对象1.注册拖放控件 (_启动窗口.取窗口句柄 ()) |
|