获取压缩文件内容列表

易语言 2020-08-17 18:13:06

获取压缩文件内容列表

.如果真 (取文本右边 (目录, 1) ≠ “\”)
目录 = 目录 + “\”
.如果真结束
文件 = 寻找文件 (目录 + “*.*”, )
.判断循环首 (文件 ≠ “”)
调试输出 (取文本右边 (处理路径 (目录 + 文件, 50), 取文本长度 (处理路径 (目录 + 文件, 50)) - 取文本长度 (目录1) - 1))
编辑框1.加入文本 (取文本右边 (处理路径 (目录 + 文件, 50), 取文本长度 (处理路径 (目录 + 文件, 50)) - 取文本长度 (目录1) - 1) + #换行符)
文件 = 寻找文件 (, )
.判断循环尾 ()
文件 = 寻找文件 (目录 + “*.*”, #子目录)
.判断循环首 (“” ≠ 文件)
.如果真 (取文本右边 (文件, 1) ≠ “.”)
遍历目录 (目录 + 文件)
.如果真结束
文件 = 寻找文件 (, #子目录)
.判断循环尾 ()