建议精易模块添加这个命令：音乐_置进度

yyyxb

  

子程序名	返回值类型	公开	备 注
音乐_置进度
参数名	类 型	参考	可空	数组	备 注
标识	文本型
位置	整数型

mciSendStringA (“seek ” ＋ 标识 ＋ “ to ” ＋ 到文本 (位置), “0”, 0, 0)
mciSendStringA (“play ” ＋ 标识, “0”, 0, 0)

.版本 2<br /> <br /> .子程序 音乐_置进度, , 公开, <br /> .参数 标识, 文本型<br /> .参数 位置, 整数型<br /> <br /> mciSendStringA (“seek ” ＋ 标识 ＋ “ to ” ＋ 到文本 (位置), “0”, 0, 0)<br /> mciSendStringA (“play ” ＋ 标识, “0”, 0, 0)

近期想搞个小播放器，但我的bass模块不支持 MIDI 文件，于是用起了精易模块。但没有置进度的命令，于是上网查了很久才勉强仿照写了这个命令（本人小白，还没基础）。返回值也没搞，但够用。
如果不想置进度后自动播放，那么请删除命令“mciSendStringA (“play ” ＋ 标识, “0”, 0, 0)”，但之后想继续播放，那么用“mciSendStringA (“play ” ＋ 标识, “0”, 0, 0)”，而不是精易模块里的“音乐_播放 ()”

（对了，如果通过“音乐_时长 ()”取 MIDI 文件的时长取出的不是毫秒数，无论怎么除都不能成秒数）

yyyxb

sangco 发表于 2022-5-21 08:31
给你大大的赞...精易不是万能的. 自己研究就很牛了

谢谢Thanks♪(･ω･)ﾉ

sangco

给你大大的赞...精易不是万能的. 自己研究就很牛了