易语言文件夹数组

1. 易语言如何取指定目录下所有文件的绝对路径并加入文本型数组

.版本
2
.支持库
spec
.子程序
文件搜索,
文本型,
公开,
在指定目录下搜索文件
.参数
临时目录,
文本型,
,
欲寻找的目录
.参数
列表框,
列表框
.局部变量
临时文件名,
文本型
.局部变量
临时子目录,
文本型
.局部变量
临时内容,
文本型
.如果真
(取文本右边
(临时目录,
1)
≠
“\”)
临时目录
＝
临时目录
＋
“\”
.如果真结束
处理事件
()
临时文件名
＝
寻找文件
(临时目录
＋
“*.*”,
)
.判断循环首
(临时文件名
≠
“”)
.如果真
(临时文件名
≠
“.”)
列表框.加入项目
(临时目录
＋
临时文件名,
)
.如果真结束
临时文件名
＝
寻找文件
(,
)
.判断循环尾
()
临时子目录
＝
寻找文件
(临时目录
＋
“*.*”,
#子目录)
调试输出
(临时子目录)
.判断循环首
(临时子目录
≠
“”)
.如果真
(临时子目录
≠
“.”
且
临时子目录
≠
“..”)
临时内容
＝
文件搜索
(临时目录
＋
临时子目录,
列表框)
.如果真
(临时内容
≠
“”)
返回
(临时内容)
.如果真结束
.如果真结束
临时子目录
＝
寻找文件
(,
#子目录)
.判断循环尾
()
返回
(“”)

2. 易语言写数组内容到配置文件问题

.版本 2

.子程序 _按钮1_被单击
.局部变量 值, 文本型
.局部变量 计次, 整数型

.计次循环首 (取数组成员数 (test), 计次)
值 ＝ 值 ＋ test [计次] ＋ “|”
.计次循环尾 ()
写配置项 (“c:\set.ini”, “aaa”, “a1”, 值)

3. 易语言怎样取文件夹中的文件数

你可以先寻找文件夹里的子目录把他放在一个数组变量里，用多次寻找文件指专令把所有文件里属和子目录里的文件都加起来就可以了。 具体的命令使用你看一下核心支持库-磁盘操作-寻找文件的帮助
.版本 2
.子程序 _按钮1_被单击
.局部变量 文件数, 整数型
.局部变量 目录路径, 文本型
.局部变量 文件, 文本型
目录路径 ＝ 取运行目录 ()
文件 ＝ 寻找文件 (取运行目录 () ＋ “\*.*”, )
.判断循环首 (文件 ≠ “”)
文件数 ＝ 文件数 ＋ 1
文件 ＝ 寻找文件 (, )
.判断循环尾 ()
标签1.标题 ＝ 到文本 (文件数)\
临时文件名 ＝ 寻找文件 (文件夹目录 ＋ “/*.*”, )
.判断循环首 (临时文件名 ≠ “”)
文件个数 ＝ 文件个数 ＋ 1 临时文件名 ＝ 寻找文件 (, )
.判断循环尾 ()
以上只能取一个文件夹里的文件数，还不包括子目录里的。

4. 易语言如何定义数组

1、打开易语言新建一个windows程序进入下图界面。

5. 想用易语言写一个随机抽取电脑里的一个文件夹里的文件,代码怎么写

把文件名放入数组，取随机数得到成员位置，从成员中读取文件名。
以下是我写的一个程序的数据初始化部分：

.版本 2

.子程序 数据初始化, , , 读入数据文件，完成图片、声音、中英文意义的初始
.局部变量 临时变量, 文本型, , , 用来记录两组之间的分隔

连续赋值 (“”, 编辑框中文意思.内容, 编辑框英文单词.内容)
数组清零 (显示图片名)
数组清零 (声音名)
数组清零 (中文名)
数组清零 (英文名)
数组清零 (图片数据)
连续赋值 (“”, 编辑框中文意思.内容, 编辑框英文单词.内容)
主图片框.图片 ＝ #封面

图片总数 ＝ 1
当前序号 ＝ 1

' 读取文件名
当前文件号 ＝ 打开文件 (“data.txt”, , )
.变量循环首 (1, 100, 1, )

显示图片名 [图片总数] ＝ 读入一行 (当前文件号)
.如果 (显示图片名 [图片总数] ＝ “”)
图片总数 ＝ 图片总数 － 1
跳出循环 ()
.否则

.如果结束

声音名 [图片总数] ＝ 读入一行 (当前文件号)
.如果 (声音名 [图片总数] ＝ “”)
图片总数 ＝ 图片总数 － 1
跳出循环 ()
.否则

.如果结束

中文名 [图片总数] ＝ 读入一行 (当前文件号)
.如果 (中文名 [图片总数] ＝ “”)
图片总数 ＝ 图片总数 － 1
跳出循环 ()
.否则

.如果结束

英文名 [图片总数] ＝ 读入一行 (当前文件号)
.如果 (英文名 [图片总数] ＝ “”)
图片总数 ＝ 图片总数 － 1
跳出循环 ()
.否则

.如果结束
临时变量 ＝ 读入一行 (当前文件号)
图片总数 ＝ 图片总数 ＋ 1

.变量循环尾 ()
关闭文件 (当前文件号)
' 以下为读入图片
.计次循环首 (图片总数, 当前序号)
当前文件号 ＝ 打开文件 (“data\” ＋ 显示图片名 [当前序号], , )
.如果 (当前文件号 ≠ 0)
图片数据 [当前序号] ＝ 读入字节集 (当前文件号, 取文件长度 (当前文件号))
.否则
文件未找到 (“图片” ＋ #左引号 ＋ 显示图片名 [当前序号] ＋ #右引号)
图片数据 [当前序号] ＝ #封面
.如果结束
关闭文件 (当前文件号)
.计次循环尾 ()
按钮自动.获取焦点 ()