求助如何获取文件夹内 mp4视频文件的文件名称

longdaqing

求助如何获取文件夹内 mp4视频文件的文件名称，文件夹内有很多视频，要一键获取到所有视频文件的名称到编辑框，请问这个要怎么写呢？谢谢各位大哥~




只需要前面的文件名，后面的一串数字不要，麻烦大哥们帮忙告知下怎么写呢，谢谢了~

是可可吖

longdaqing 发表于 2025-3-27 17:52
谢谢大哥，再问下，固定文件目录哪里，我想要取当前运行目录的文件，要怎么改一下呢？ ...

1111111111.e (1 MB, 下载次数: 8)

2025-3-27 18:03 上传

点击文件名下载附件


补充内容 (2025-3-27 18:04):
取运行目录的话 只能编译后把程序放在视频目录里

花间一壶酒

文件_枚举（）   +  文件_取文件名（）

补充内容 (2025-3-27 16:52):
精易模块的命令  前者 将指定目录下的指定格式文件路径枚举到数组  后者将指定路径 转换成文件名 不包含前面的文件夹路径

花间一壶酒

  

子程序名	返回值类型	公开	备 注
_启动子程序	整数型		本子程序在程序启动后最先执行

例子 (“这里填你的文件夹路径”)
返回 (0)  ' 可以根据您的需要返回任意数值

子程序名	返回值类型	公开	备 注
例子
参数名	类 型	参考	可空	数组	备 注
文件夹路径	文本型

变量名	类 型	静态	数组	备 注
视频路径组	文本型		0
i	整数型

文件_枚举 (文件夹路径, “*.mp4”, 视频路径组, 假, , )  ' 要完整路径就填真  只要文件名就填假
计次循环首 (取数组成员数 (视频路径组), i)
调试输出 (视频路径组 [i])
计次循环尾 ()

i支持库列表	支持库注释
spec	特殊功能支持库

.版本 2<br /> .支持库 spec<br /> <br /> .子程序 _启动子程序, 整数型, , 本子程序在程序启动后最先执行<br /> <br /> 例子 (“这里填你的文件夹路径”)<br /> 返回 (0)  ' 可以根据您的需要返回任意数值<br /> <br /> .子程序 例子<br /> .参数 文件夹路径, 文本型<br /> .局部变量 视频路径组, 文本型, , "0"<br /> .局部变量 i, 整数型<br /> <br /> 文件_枚举 (文件夹路径, “*.mp4”, 视频路径组, 假, , )  ' 要完整路径就填真  只要文件名就填假<br /> .计次循环首 (取数组成员数 (视频路径组), i)<br />     调试输出 (视频路径组 <i>)<br /> .计次循环尾 ()

是可可吖

文件枚举   取文件名   文本_取出文本中汉字   加入到编辑框

丿Mrs°戮默

[JavaScript] 纯文本查看 复制代码

.版本 2
.支持库 spec

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

文件_枚举 (“目录自己写”, “.mp4”, 文件数组, 真, )
.计次循环首 (取数组成员数 (文件数组), i)
    调试输出 (文件数组 )
.计次循环尾 ()

帅气与大侠

  

变量名	类 型	静态	数组	备 注
返回文件名	文本型		0

取文件里MP4文件名到数字为止 (“c:\文件夹”, 返回文件名)
调试输出 (返回文件名)

子程序名	返回值类型	公开	备 注
取文件里MP4文件名到数字为止	整数型
参数名	类 型	参考	可空	数组	备 注
文件夹	文本型
返回文件名数组	文本型

变量名	类 型	静态	数组	备 注
文件名	文本型
i	整数型
代码	整数型

清除数组 (返回文件名数组)
文件名 ＝ 寻找文件 (文件夹 ＋ “*.mp4”, )
判断循环首 (文件名 ≠ “”)
计次循环首 (取文本长度 (文件名), i)
代码 ＝ 取代码 (文件名, i)
如果真 (代码 ≥ 48 且 代码 ≤ 57)  ' 0-9
文件名 ＝ 取文本左边 (文件名, i)
跳出循环 ()
如果真 (代码 ＝ 46)  ' 小数点
文件名 ＝ 取文本左边 (文件名, i)
跳出循环 ()

计次循环尾 ()
加入成员 (返回文件名数组, 文件名)
文件名 ＝ 寻找文件 (, )
判断循环尾 ()
返回 (取数组成员数 (返回文件名数组))

i支持库列表	支持库注释
spec	特殊功能支持库

.版本 2<br /> .支持库 spec<br /> <br /> .局部变量 返回文件名, 文本型, , "0"<br /> <br /> 取文件里MP4文件名到数字为止 (“c:\文件夹”, 返回文件名)<br /> 调试输出 (返回文件名)<br /> <br /> .子程序 取文件里MP4文件名到数字为止, 整数型<br /> .参数 文件夹, 文本型<br /> .参数 返回文件名数组, 文本型, 数组<br /> .局部变量 文件名, 文本型<br /> .局部变量 i, 整数型<br /> .局部变量 代码, 整数型<br /> <br /> 清除数组 (返回文件名数组)<br /> 文件名 ＝ 寻找文件 (文件夹 ＋ “*.mp4”, )<br /> .判断循环首 (文件名 ≠ “”)<br /> <br />     .计次循环首 (取文本长度 (文件名), i)<br />         代码 ＝ 取代码 (文件名, i)<br />         .如果真 (代码 ≥ 48 且 代码 ≤ 57)  ' 0-9<br />             文件名 ＝ 取文本左边 (文件名, i)<br />             跳出循环 ()<br />         .如果真结束<br />         .如果真 (代码 ＝ 46)  ' 小数点<br />             文件名 ＝ 取文本左边 (文件名, i)<br />             跳出循环 ()<br />         .如果真结束<br /> <br />     .计次循环尾 ()<br />     加入成员 (返回文件名数组, 文件名)<br />     文件名 ＝ 寻找文件 (, )<br /> .判断循环尾 ()<br /> 返回 (取数组成员数 (返回文件名数组))

是可可吖

  

子程序名	返回值类型	公开	备 注
_按钮1_被单击

变量名	类 型	静态	数组	备 注
视频组	文本型		0
i	整数型
视频名	文本型

文件_枚举 (“E:\【视频类】\杂乱视频”, “*.mp4”, 视频组, , , )
计次循环首 (取数组成员数 (视频组), i)
视频名 ＝ 文本_取出文本中汉字 (文件_取文件名 (视频组 [i], ))
编辑框1.加入文本 (视频名 ＋ #换行符 )
计次循环尾 ()

.版本 2<br /> <br /> .子程序 _按钮1_被单击<br /> .局部变量 视频组, 文本型, , "0"<br /> .局部变量 i, 整数型<br /> .局部变量 视频名, 文本型<br /> <br /> 文件_枚举 (“E:\【视频类】\杂乱视频”, “*.mp4”, 视频组, , , )<br /> .计次循环首 (取数组成员数 (视频组), i)<br />     视频名 ＝ 文本_取出文本中汉字 (文件_取文件名 (视频组 <i>, ))<br />     编辑框1.加入文本 (视频名 ＋ #换行符)<br /> .计次循环尾 ()

补充内容 (2025-3-27 17:02):
目录自己改

aipca

这么个意思

丿Mrs°戮默

  

变量名	类 型	静态	数组	备 注
文件数组	文本型		0
i	整数型

文件_枚举 (“目录自己写”, “.mp4”, 文件数组, 真, )
计次循环首 (取数组成员数 (文件数组), i)
调试输出 (文件数组 [i])
计次循环尾 ()

i支持库列表	支持库注释
spec	特殊功能支持库

.版本 2<br /> .支持库 spec<br /> <br /> .局部变量 文件数组, 文本型, , "0"<br /> .局部变量 i, 整数型<br /> <br /> 文件_枚举 (“目录自己写”, “.mp4”, 文件数组, 真, )<br /> .计次循环首 (取数组成员数 (文件数组), i)<br />     调试输出 (文件数组 <i>)<br /> .计次循环尾 ()