|
15精币
.版本 2
.支持库 iext
.支持库 spec
.支持库 PBShell
.子程序 搜索歌词
.参数 找到的文件, 文本型
.如果真 (找到的文件 = 寻找文件 (歌词目录_编辑框.内容 + 音乐列表框.取标题 (音乐列表框.现行选中项, 1) + “.lrc”, 1 + 2 + 4 + 16 + 32) = 真)
歌词内容_编辑框.内容 = 取字节集数据 (读入文件 (歌词目录_编辑框.内容 + 找到的文件), #文本型, )
上面红色的 读不出来 歌词内容_编辑框.内容为空白 为什么说不出来 问题在哪
.如果真结束
信息框_皮肤 (取窗口句柄 (), “未找到 ” + 音乐列表框.取标题 (音乐列表框.现行选中项, 1) + “ 的歌词。” + #换行符 + #换行符 + “请确认目录设置是否正确 或 本机中是否存在该文件”, #信息图标, “提示信息”)
红紫色 的代码段 为什么 它 都把文件 找到了 还老提示,没有找到
调试输出 (歌词目录_编辑框.内容 + 找到的文件)
* “D:\软件\播放器\TTPlayer\Lyrics\暴林 - 男人的无奈dj舞曲.lrc”
被调试易程序运行完毕
.子程序 _歌词目录_被选择
歌词目录_编辑框.内容 = 浏览文件夹 (“请选择歌词目录”, ) + “\”
.子程序 _音乐列表框_当前表项被改变
.判断开始 (歌词目录_编辑框.内容 ≠ “”)
搜索歌词 (音乐列表框.取标题 (音乐列表框.现行选中项, 1) + “.lrc”)
.默认
信息框_皮肤 (取窗口句柄 (), “没有指定目录,请先在菜中设置目录”, #信息图标, “提示信息”)
.判断结束
补充内容 (2013-9-24 13:01):
问题以 自己解决 此帖无最佳 |
最佳答案
查看完整内容
.版本 2
.支持库 iext
子程序 _设置目录_被单击
目录内容 = 浏览文件夹 (“请选择目录”, ) + “\”
.子程序 _搜索歌词_被单击
.局部变量 找到的文件, 文本型
找到的文件 = 寻找文件 ( 目录.内容 + 这里写你要找的文件名 + “.lrc”, 1 + 2 + 4 + 16 + 32)
.如果 (找到的文件 ≠ “”)
读取文件.内容 = 取字节集数据 (读入文件 (目录.内容 + 找到的文件), #文本型, )
.否则
信息框_皮肤 (取窗口句柄 (), “ ...
|