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

易语言如何获取文件夹内的所有文件?,第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、帆迹最后,设置好之后,如图所示,再点击下面的启动窗口即可完成 *** 作,这样就可以解决问题。

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

我帮你编了一段简单的示例代码,寻找并开启QQ.EXE的程序,希望对你有帮助

-------------------------以下是代码----------------------------

.版本

2

.子程序

_按钮改弯1_被单击

.局部变量

磁盘_数组,

文本型,

,

"0"

.局部变量

数,

整数型

取可用磁盘

(磁盘_数组)

.计次循环首

(取数组成员数

(磁盘_数组),

数)

.如果真

(子程序_搜索文件并运行

(磁盘_数组

[数]

“:\”,

“QQ.exe”)

“”)

跳出循环

()

.如果真结束

.计次循环尾

()

.子程序

取可用磁盘

.参数

磁盘_数组,

文本型,

数组

.局部变量

磁盘,

文本型

.局部变量

数组,

整数型

.局部变量

数,

整数型

磁盘

“C,D,E,F,G,H,I,J,K,L,N,M,O,P,Q,R,S,T,U,V,W,X,Y,Z”

磁盘_数组

分割文本

(磁盘,

“,”,

)

数组

取数组成员数

(磁盘_数组)

.计次循环首

(数组,

数)

输出调试文本

(磁盘_数组

[数组

1]

到文本

(取磁盘剩余空间

(磁盘_数组

[数组

1])))

.如果真

(取磁盘剩余空间

(磁盘_数组

[数组

1])

-1)

删除成员

(磁盘_数组,

数组

1,

1)

.如果真结束

.计次循环尾

()

.子程序

子程序_搜索文件并运行,

文本型,

,

搜索不到返回“”

.参数

起始搜索路径,

文本型

.参数

欲寻找的文件,

文本型

.局部变量

文件名,

文本型

.局部变量

起始搜索路径_,

文本型

.局部变量

欲寻找的文件_,

文本型

.局部变量

找到的路径_数组,

文本型,

,

"0"

.局部变量

欲搜索路径_数组,

文本型,

,

"0"

.局部变量

数,

整数型

起始搜索路径型袜_

起始搜索路径

欲寻找的文件_

欲寻找的文件

.如果真

(取文本右边

(起始搜索路径_,

1)

“\”)

起始搜索路径_

起始搜索路卜歼激径_

“\”

.如果真结束

加入成员

(找到的路径_数组,

起始搜索路径_)

.判断循环首

(取数组成员数

(找到的路径_数组)

0)

复制数组

(欲搜索路径_数组,

找到的路径_数组)

清除数组

(找到的路径_数组)

.计次循环首

(取数组成员数

(欲搜索路径_数组),

数)

.如果真

(文件是否存在

(欲搜索路径_数组

[数]

欲寻找的文件_)

真)

运行

(欲搜索路径_数组

[数]

欲寻找的文件_,

假,

)

返回

(欲搜索路径_数组

[数]

欲寻找的文件_)

.如果真结束

文件名

寻找文件

(欲搜索路径_数组

[数]

“*.*”,

#子目录)

'

输出调试文本

(文件名)

.判断循环首

(文件名

“”)

.如果真

(文件名

“.”

文件名

“..”)

加入成员

(找到的路径_数组,

欲搜索路径_数组

[数]

文件名

“\”)

.如果真结束

文件名

寻找文件

(,

#子目录)

'

输出调试文本

(文件名)

.判断循环尾

()

.计次循环尾

()

.判断循环尾

()

返回

(“”)

首先,如果其他程序不是自绘出来的。如果是自绘出来的话,是找不到那个按钮的id的。如果不是自绘的窗口。那么可以获得窗口内的所有子窗橘陪口句柄。

先:枚举顶级窗口

(

,

)

寻找子窗口

(窗口句柄,

0,

“edit”,

“”)

枚举子窗口

(窗口瞎手句柄,

&枚举窗口内的句柄,

0)

最终得到文字:句柄

子磨伍嫌句柄

[14]‘这里的就是窗口内第几个子窗口句柄。我这个是以前做游戏自动喊话得到的窗口句柄。


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

原文地址: http://outofmemory.cn/yw/12382195.html

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

发表评论

登录后才能评论

评论列表(0条)

保存