易语言获取文件名放入超级列表框

⑴ 易语言怎么把文件夹里的文件加入到超级列表框

要将文件夹下的内容添加到超级列表框，搜卖你需要编写代码遍历文件夹，并将搜索到的春腔指定文件加入世森逗到超级列表框中，好在现在你有了一个很好的选择，可以不必编写文件搜索器，直接使用现成的第三方模块即可，你可以到http://blog.csdn.net/kflizcst/archive/2009/04/17/4086942.aspx下载这个模块（内含易语言例程）。

如果你仍然不知怎么解决可与863694068(QQ)联系。

⑵ 易语言把文件拖动到超级列表框，以图标形式显示，点击图标运行程序

下面是一个完整的源码，你参考一下。
.程序集
窗口程序集1
.程序集变量
拖放文件名,
文本型
.程序集变量
路径名,
文本型
.程序集变量
图片号
.程序集变量
图片组,
字节集
.程序集变量
文件名,
文本型
.程序集变量
路径,
文本型,
,
"0"
.子程序
__启动窗口_创建完毕
拖放对象1.注册拖放控件
(_启动窗口.取窗口句柄
())
拖放对象1.接收文件
＝
真
图片组
＝
超级列表框1.图片组
.子程序
_超级列表框1_被双击,
逻辑型
.参数
横向位置,
整数型
.参数
纵向位置,
整数型
.参数
功能键状态,
整数型
.局部变量
项目
.如果真
(超级列表框1.现行选中项
＝
-1)
'
避免有项目/没项目时，运行项宏芹目出错
返回
()
.如果真结束
.如果真
(超级列表框1.取表项数
()
≥
1)
'
有项目时才能运行
项目
＝
超级列表框1.取表项数值
(超级列表框1.现行选中项)
执行
(,
路径
[项目],
,
)
.如果真结束
.子程序
_拖放对象1_得到文件
.参数
接收到的文件路径,
文本型
.局部变量
文件后缀名,
文本型
.局部变量
文件名1,
文本型,
,
"0"
.局部变量
后缀名,
文本型
文件名1
＝
分割文本
(接收到的文件路径,
#换行符,
1)
拖放文件名
＝
文件名1
[1]
路径名
＝
拖放文件名
文件后缀名
＝
取文本右边
(路径名,
取文本长度
(路径名)
－
倒找文本
(路径名,
“.”,
,
假))
后缀名
＝
文件后缀名
.如果
(后缀名
＝庆卖
“exe”)
图片号
＝
提取加入图片
(图片组,
拖放文件名,
,
)
.否则
图片蔽差毕号
＝
提取加入图片
(图片组,
查询快捷方式
(拖放文件名),
,
)
.如果结束
超级列表框1.图片组
＝
图片组
文件名
＝
取文本右边
(路径名,
取文本长度
(路径名)
－
倒找文本
(路径名,
“\”,
,
假))
文件名
＝
取文本左边
(文件名,
取文本长度
(文件名)
－
4)
加入成员
(路径,
路径名)
.如果
(图片号
≠
-1)
超级列表框1.插入表项
(-1,
文件名,
图片号,
,
,
取数组成员数
(路径))
.否则
超级列表框1.插入表项
(-1,
文件名,
0,
,
,
取数组成员数
(路径))

⑶ 易语言txt内容导入超级列表框

组件：通用对话框、按钮、超级列表框

名称均为：通用对话框1、按钮1、超级列表框1

代码如下：

.版本 2

.支持库 EThread

.支持库 iext

.程序集 窗口程序集_启动窗口

.程序集变量 文本, 文本型

.子程序 _按钮1_被单击

.如果真 (通用对话框1.打开 ())

文本 ＝ 到文本 (读入文件 (通用对话框1.文件名))

.如果真 (删首尾空 (文本) ≠ “”)

启动线程 (&子程序1, , )

.如果真结束

.如果真结束

.子程序 子程序1

.局部变量 分割_文本行, 文本型, , "0"

.局部变量 n, 整数型

.局部变量 临时文本, 文本型

.局部变量 分割_号码, 文本型, , "0"

.局部变量 a, 整数型

分割_文本行 ＝ 分割文本 (文本, #换行符, )

.计次循环首 (取数组成员数 (分割_文本行), n)

临时文本 ＝ 删首尾空 (分割_文本行 [n])

.如果真 (临时文本 ≠ “”)

分割_号码 ＝ 分割文本 (临时文本, “ ”, )

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

超级列表框1.置标题 (a, 0, 分割_号码 [1])

超级列表框1.置标题 (a, 1, 分割_号码 [2])

超级列表框1.置标题 (a, 2, 分割_号码 [3])

超级列表框1.置标题 (a, 3, 分割_号码 [4])

超级列表框1.置标题 (a, 4, 分割_号码 [5])

超级列表框1.置标题 (a, 5, 分割_号码 [6])

超级列表框1.置标题 (a, 6, 分割_号码 [7])

超级列表框1.置标题 (a, 7, 分割_号码 [8])

.如果真结束

.计次循环尾 ()

⑷ 易语言 读文件夹文件到超级列表框

.版本
2
.支持库
shell
.
子程序
_按钮1_被单击
浏览文件夹
(“选择信任目录”,
)
.
程序集
窗口程序集1
.子程序
_按钮1_被单击
.
局部变量
局_文本,
文本型
.局部变量
局_类型,
文本型
.局部变量
局_数组,
文本型,
,
"0"
.局部变量
局_索引,
整数型
编辑框1.内容
＝
浏览文件夹
(“选择
文件目录
”,
)
.如果真
(编辑框1.内容
＝
“”)
返回
()
.如果真结束
.如果真
(取文本右边薯氏
(编辑框1.内容,
1)
≠
“\”)
编辑框1.内容
＝
编辑框1.内容
＋
“\”
.如果真结束
局_类型
＝
编辑框1.内容
＋
“*.txt”
局_文本
＝
寻找文件
(局_类型,
)
超级列表框1.全部删除
()
.判断循环首
(局_文本
≠
“”)
局_类型
＝
编辑框1.内容
＋
局_文本
局_文本
＝
取文本左边
(局_文本,
倒找文本
(局_文本,
“.”,
,
假)
－
1)
局_数组
＝
分割文本
(局_文本,
“+”,
)
.如果真
(取数组成员数
(局_数组)
≥
3)
局_索引
＝
超级枣枯列表框1.插入表项
(,
到文本
(局_索引
＋
1),
,
,
,
)
超级列表框1.置标题
(局_索引,
1,
局_数组
[1])
超级列表框1.置标题
(局_索引,
2,
局_数组
[2])
超级列表框1.置标题
(局_索引,
3,
局_数组
[3])
超级列表框1.置标题
(局_索引,
4,
局_类型)
.如果真数岩散结束
局_文本
＝
寻找文件
(,
)
.判断循环尾
()

⑸ 易语言怎么把一个文件夹中的全部文件名加入列表框

.版本
2
.支持库
iext
.子程序
_按钮1_被单击
.局部变量
ID,
整数型
.局部变量
文件夹信息,
文件夹信息_
.局部变量
MP3路径,
文本型
.局部变量
路径,
文本型
.局部变量
索引,
整数型
.局部变量
音乐路径,
文本型,
,
"0"
.局部变量
计次,
整数型
路径
＝
取空白文本
(255)
ID
＝
浏览文件夹对话框_
(文件夹信息)
从列表id取路径_
(ID,
路径)
文件框1.目录
＝
路径
MP3路径
＝
寻找文件
(路径
＋
“\*.mp3”,
)
.判断循环首
(MP3路径
≠
“”)
输出调试文本
(MP3路径)
索引
＝
超级列表框1.插入表项
(,
,
,
,
,
)
超级列表框1.置标题
(索引,
0,
路径
＋
“\”
＋
MP3路径)
MP3路径
＝
寻找文件
(,
)
.判断循环尾
()
.计次循环首
(超级列表框1.取表项数
(),
计次)
加入成员
(音乐路径,
超级列表框1.取标题
(计次
－
1,
0))
.计次循环尾
()
播放MP3
(,
音乐路闭毕兄径)
.版本
2
.DLL命令
从列表id取轿袭路径_,
整数型,
"shell32.dll",
"SHGetPathFromIDListA",
,
,
.参数
结构指针,
整数型,
,
pIdl
.参数
路径,
文本型,
传址,
pszPath
.DLL命令
浏览文件夹对话框_,
整数型,
"shell32.dll",
"SHBrowseForFolderA",
,
,
.参数
浏览文件夹结构,
文件夹信数亮息_
.版本
2
.数据类型
文件夹信息_,
,
,
BROWSEINFO
.成员
窗口句柄,
整数型,
,
,
hOwner
.成员
根目录,
整数型,
,
,
pidlRoot
.成员
显示名称,
文本型,
,
,
pszDisplayName
.成员
标题,
文本型,
,
,
lpszTitle
.成员
标志,
整数型,
,
,
ulFlags
.成员
回调函数地址,
整数型,
,
,
lpfn
.成员
回调函数参数,
整数型,
,
,
lParam
.成员
图像索引,
整数型,
,
,
iImage
列表框也是一样的,你换过来不就成了,文件筐1.目录报错是因为你没有添加该组件,请在设计窗口上拖出该组件

⑹ 易语言如何选中组合框里的文件夹，然后让文件夹里的文件展示在超级列表框中呢

.版本 2
.支持库 iext

.子程序 目录找文件
.参数 目录, 文本型
.局部变量 文件名, 文本型
.局部变量 b, 整数型

超级列表框1.全部删除 ()
目录 ＝ 选择 (取帆春文本右边 (目录, 1) ＝ “\”, 目录, 目录 ＋ “\”)
文件名 ＝ 寻找文件 (目录 ＋ “\*.*”, #子目录)
.判断循环首 (文件名 ≠ “”)
.如果真 (文件名 ≠ “.” 且 文件名 ≠ “..”)
.判断开春轿圆始 (选择框1.选中 ＝ 真)
b ＝ 超级列表框1.插入表项 (, , , , , )
超级列表框1.置扒塌标题 (b, 0, 文件名)
.默认
.如果真 (位与 (取文件属性 (目录 ＋ 文件名), #隐藏文件) ＝ 0)
b ＝ 超级列表框1.插入表项 (, , , , , )
超级列表框1.置标题 (b, 0, 文件名)
.如果真结束

.判断结束

.如果真结束
文件名 ＝ 寻找文件 (, #子目录)
.判断循环尾 ()
===============================
这个子程序给你，你自己看下再修改修改

⑺ 易语言文本导入超级列表框

组件：通用对话框、按钮、超级列表框

名称均为：通用对话框1、按钮1、超级列表框1

代码如下：

.版本 2

.支持库 EThread

.支持库 iext

.程序集 窗口程序集_启动窗口

.程序集变量 文本, 文本型

.子程序 _按钮1_被单击

.如果真 (通用对话框1.打开 ())

文本 ＝ 到文本 (读入文件 (通用对话框1.文件名))

.如果真 (删首尾空 (文本) ≠ “”)

启动线程 (&子程序1, , )

.如果真结束

.如果真结束

.子程序 子程序1

.局部变量 分割_文本行, 文本型, , "0"

.局部变量 n, 整数型

.局部变量 临时文本, 文本型

.局部变量 分割_号码, 文本型, , "0"

.局部变量 a, 整数型

分割_文本行 ＝ 分割文本 (文本, #换行符, )

.计并歼次循环首 (取数组成员数 (分割_文本行), n)

临时文本 ＝ 删首尾空 (分割_文本行 [n])

.如果真 (临时文本 ≠ “”)

分割_号码 ＝ 分割文本 (临时文本, “ ”, )

a ＝ 超级段蔽含列表框1.插入表项 (, , , , , )

超级列表框1.置标题 (a, 0, 分割_号码 [1])

超级列表框1.置标题 (a, 1, 分割_号码 [2])

超级列表框1.置标题 (a, 2, 分割_号码 [3])

超级列表框1.置标题 (a, 3, 分割_号码 [4])

超级列表框1.置标题 (a, 4, 分割_号码 [5])

超握笑级列表框1.置标题 (a, 5, 分割_号码 [6])

超级列表框1.置标题 (a, 6, 分割_号码 [7])

超级列表框1.置标题 (a, 7, 分割_号码 [8])

.如果真结束

.计次循环尾 ()

⑻ 怎么做易语言做文件导入超级列表框

.版本 2
.支持库 shell
.支持库 iext
.子程序 _按钮1_被单击
.局部变量 文件夹路径, 文本型
.局部变量 文件名称, 文本型
.局部变量 文件成员, 文本型, , "0"
.局部变量 n, 整数型
文件夹路径 ＝ 浏览文件夹 (“选择文件夹”, )
文件名称 ＝ 寻找文件 (文件夹路径 ＋ “\*.mp3”, )
.判断循环首 (文件名称 ≠ “”)
加入成员 (文件成员, 文件名称)
文件名称 ＝ 寻找文件 (, )
.判断循环尾 ()
.计次循环首 (取数组成员数 (文件成员), n)
超级列表框1.插入表项 (, , , , , )
超级列表框1.置标题 (n － 1, 0, 文件成员 [n])
超级列表框1.置标题 (n － 1, 1, 文件夹路径 ＋ “\” ＋ 文件成员 [n])
.计次循环尾 ()

⑼ 易语言中如何取文件夹内的所有文件名前三位放入超级列表框第一列，后几位放入超级列表框第二列

.版本 2

.支持库 shell

.支持库 iext

.子程序 __启动窗口_创建完毕

.局部变量 目录, 文本型

.局部变量 文件名, 文本型

.局部变量 文件组, 文本型, , "0"

.局部变量 计次, 整数型

.局部变量 行, 整数型

目录 ＝ 浏览文件夹 (“请选择目录:”, 假)

.如果真 (目录 ＝ “”)

目录 ＝ 取运行目录 ()

.如果真结束

目录 ＝ 目录 ＋ “”

文件名 ＝ 寻找文件 (目录 ＋ “*.*”, )

.循环判断首 ()

加入成员 (文件组, 文件名)

文件名 ＝ 寻找文件 (, )

.循环判断尾 (文件名 ≠ “”)

.计次循环首 (取数组成员数 (文件组), 计次)

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

文件名 ＝ 取文本左边 (文件组 [计次], 3)

超级列表框1.置标题 (行, 0, 文件名)

文件名 ＝ 取文本右边 (文件组 [计次], 取文本长度 (文件组 [计次]) － 倒找文本 (文件组 [计次], “.”, , 假))

超级列表框1.置标题 (行, 2, 文件名)

文件名 ＝ 取文本中间 (文件组 [计次], 4, 取文本长度 (文件组 [计次]) － 取文本长度 (文件名) － 4)

超级列表框1.置标题 (行, 1, 文件名)

.计次循环尾 ()

⑽ 易语言超级列表框导入文件

超级列表框1.插入表项（超级列御猜铅表框1.取表项数）’纯手打 求分
超级列表框1.置标题（索引,0,到文本（超级列表框1.取表项数））’纯手打 求分
超级列表框1.置镇好标题（索引,1,文件名）’纯手打 求分
超级列表框1.置标题（索引,2,通用对兆颤话框.文件名）’纯手打 求分