易语言递归实现取所有子目录 目录_枚举所有子目录

901

刚在求助区看到有人要,就顺手写了个，希望对大家有帮助！

目录_枚举所有子目录()   可直接调用

  

窗口程序集名	保 留	保 留	备 注
窗口程序集_启动窗口			精易ID:901  QQ:996666885
变量名	类 型	数组	备 注
目录	文本型	0

子程序名	返回值类型	公开	备 注
目录_枚举所有子目录
参数名	类 型	参考	可空	数组	备 注
目录路径	文本型
欲存放的数组变量	文本型

变量名	类 型	静态	数组	备 注
i	整数型
zs	文本型		0

计次循环首 (目录_枚举子目录 (目录路径, zs, 真), i)
目录_枚举所有子目录 (zs [i] ＋ “\”, 欲存放的数组变量)
加入成员 (欲存放的数组变量, zs [i] ＋ “\”)
处理事件 ()
计次循环尾 ()

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

变量名	类 型	静态	数组	备 注
aaa	文本型		0
i	整数型

目录_枚举所有子目录 (编辑框2.内容, aaa)
计次循环首 (取数组成员数 (aaa), i)
编辑框1.加入文本 (aaa [i] ＋ #换行符 )
计次循环尾 ()
调试输出 (“共获得”, 取数组成员数 (aaa), “个目录”)

i支持库列表	支持库注释
spec	特殊功能支持库

.版本 2<br /> .支持库 spec<br /> <br /> .程序集 窗口程序集_启动窗口, , , 精易ID:901  QQ:996666885<br /> .程序集变量 目录, 文本型, , "0"<br /> <br /> .子程序 目录_枚举所有子目录<br /> .参数 目录路径, 文本型<br /> .参数 欲存放的数组变量, 文本型, 参考 数组<br /> .局部变量 i, 整数型<br /> .局部变量 zs, 文本型, , "0"<br /> <br /> .计次循环首 (目录_枚举子目录 (目录路径, zs, 真), i)<br />     目录_枚举所有子目录 (zs <i> ＋ “\”, 欲存放的数组变量)<br />     加入成员 (欲存放的数组变量, zs <i> ＋ “\”)<br />     处理事件 ()<br /> .计次循环尾 ()<br /> <br /> .子程序 _按钮1_被单击<br /> .局部变量 aaa, 文本型, , "0"<br /> .局部变量 i, 整数型<br /> <br /> 目录_枚举所有子目录 (编辑框2.内容, aaa)<br /> .计次循环首 (取数组成员数 (aaa), i)<br />     编辑框1.加入文本 (aaa <i> ＋ #换行符)<br /> .计次循环尾 ()<br /> 调试输出 (“共获得”, 取数组成员数 (aaa), “个目录”)

枚举所有子目录.e (730.06 KB, 下载次数: 149)

2018-7-22 04:28 上传

点击文件名下载附件
下载积分: 精币 -2 枚

wanzhenghe999

谢谢@Thanks！

a1678131758

哈哈                        

gaoqing

谢谢分享支持开源

tankw

多谢66666666666666666

tankw

感谢分享666666666666666

hangyubin

谢谢楼主分享！

sxlldaj

分享是一种美德，楼主辛苦了

futiem

求助区看到有人要

zitiano

枚举指定类型的文件有没有，比如要枚举*.jpg，*.png等等指定类型的