显示指定目录内所有的文件和文件夹的代码如下:
.版本 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]‘这里的就是窗口内第几个子窗口句柄。我这个是以前做游戏自动喊话得到的窗口句柄。
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)