易语言如何获取文件夹内的所有文件?

易语言如何获取文件夹内的所有文件?,第1张

显示指定目录内所有的文件和文件夹的代码如下:

.版本 2

.支持库 iext

.子程序 目录文件夹

.局部变量 link, 文本型

.局部变量 link1, 文本型

.局部变量 目录, 文本型

超级列表框1.全部删除 ()

目录 = 驱动器框1.驱动器 + “:\*”

link = 寻找文件 (目录, #子目录)

.判断循环首 (link ≠ “”)

.如果真 (link ≠ “.” 且 link ≠ “..”)

超级列表框1.插入表项 (, link, 0, , , )

.如果真结束

link = 寻找文件 (, #子目录)

.判断循环尾 ()

link1 = 寻找文件 (目录, #子目录)

.判断循环首 (link1 ≠ “”)

.如果真 (link1 ≠ “.” 且 link1 ≠ “..”)

超级列表框1.插入表项 (, link1, 1, , , )

.如果真结束

link1 = 寻找文件 (, )

.判断循环尾 ()

.子程序 _驱动器框1_驱动器被改变

目录文件夹 ()

组件2个 超级列表框+驱动器

以下为代码图:

扩展资料

易语言编写开机自动启动的程序的方法:

1、首先需要打开易语言软件,先添加两个按钮组件,一个把按钮标题设置为设置开机启动,另一个把按钮标题设置为取消开机启动。

2、然后接下来双击第一个按钮,进入窗口程序集1写代码。

3、在代码处写设置自动运行这个命令有三个参数,第一个参数是程序名称,我们写取执行文件名(),第二个参数是程序文件名写取运行目录()+取执行文件名(),最后参数是程序要写到的位置,写#接口常量.到注册表即可。

4、最后,设置好之后,如图所示,再点击下面的启动窗口即可完成 *** 作,这样就可以解决问题。

参考资料来源:百度百科-易语言

首先要枚举出硬盘分区根目录,然后逐个根目录进行寻找文件,最后如果找到123.dll,d出一个信息框,为“123.dll”代码如下:

.版本2.支持库eapi

.子程序_按钮1_被单击.局部变量文本数组,文本型,,"0".局部变量i,整数型

文本数组=取驱动器列表(1)

'这里枚举出硬盘分区根目录.计次循环首(取数组成员数(文本数组),i)

遍历目录(文本数组[i])

处理事件().计次循环尾()

.子程序遍历目录.参数参目录,文本型.局部变量文件名,文本型.局部变量目录数组,文本型,,"0".局部变量i,整数型.局部变量文件类型

文件类型=位或(#存档文件,#只读文件,#系统文件,#隐藏文件)文件名=寻找文件(参目录+“\*.*”,文件类型).如果真(文件名=“”)

返回().如果真结束

.循环判断首()

.如果(位与(取文件属性(参目录+“\”+文件名),#子目录)≠0)

加入成员(目录数组,文件名)

.否则

.如果真(文件名=“123.dll”)

'判断文件是否存在

信息框(“123.dll”,0,)

'如果存在d出一个信息框

返回()

'然后终止搜索

.如果真结束

.如果结束

文件名=寻找文件(,文件类型).循环判断尾(文件名≠“”)

.计次循环首(取数组成员数(目录数组),i)

.如果真(目录数组[i]≠“.”且目录数组[i]≠“..”)

遍历目录(参目录+“\”+目录数组[i])

.如果真结束

.计次循环尾()

代码结束

控件只需要一个按钮,名称为按钮1


欢迎分享,转载请注明来源:内存溢出

原文地址: http://outofmemory.cn/tougao/11534417.html

(0)
打赏 微信扫一扫 微信扫一扫 支付宝扫一扫 支付宝扫一扫
上一篇 2023-05-16
下一篇 2023-05-16

发表评论

登录后才能评论

评论列表(0条)

保存