简单mp3

浅唱丿丝丝

好久不玩易语言，都忘记怎么写了，过年有时间从头看视频照写的的MP3好多东西都不会。有需要的拿走自己改写一下

  

.版本 2.支持库 shell

窗口程序集名	保 留	保 留	备 注
窗口程序集_启动窗口

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

文件框1.目录 ＝ 浏览文件夹 (“”, )

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

_播放音乐 ()

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

停止播放 ()
hk条1.位置 ＝ 1

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

如果 (按钮4.标题 ＝ “暂停”)
按钮4.标题 ＝ “恢复”
暂停播放MP3 ()
按钮4.标题 ＝ “暂停”
继续播放MP3 ()

子程序名	返回值类型	公开	备 注
_标签1_反馈事件	整数型
参数名	类 型	参考	可空	数组	备 注
参数一	整数型
参数二	整数型

hk条1.位置 ＝ 参数一

子程序名	返回值类型	公开	备 注
_hk条1_位置被改变

同步播放MP3 (文件框1.目录 ＋ “\” ＋ 文件框1.被选择文件, hk条1.位置, 标签1, )

子程序名	返回值类型	公开	备 注
_横向滚动条1_位置被改变

变量名	类 型	静态	数组	备 注
音量	整数型

系统音量1.打开 (4)
音量 ＝ 系统音量1.取最大音量 () ÷ 横向滚动条1.最大位置 �� (横向滚动条1.最大位置 － 横向滚动条1.位置)
系统音量1.置音量 (音量, 音量)

子程序名	返回值类型	公开	备 注
_播放音乐

hk条1.位置 ＝ 1
同步播放MP3 (文件框1.目录 ＋ “\” ＋ 文件框1.被选择文件, hk条1.位置, 标签1, )

i支持库列表	支持库注释
eMMedia	多媒体支持库

.版本 2.支持库 shell<br /> .支持库 eMMedia<br /> <br /> .程序集 窗口程序集_启动窗口<br /> <br /> .子程序 _按钮2_被单击<br /> <br /> 文件框1.目录 ＝ 浏览文件夹 (“”, )<br /> <br /> .子程序 _按钮1_被单击<br /> <br /> _播放音乐 ()<br /> <br /> .子程序 _按钮3_被单击<br /> <br /> 停止播放 ()<br /> hk条1.位置 ＝ 1<br /> <br /> .子程序 _按钮4_被单击<br /> <br /> .如果 (按钮4.标题 ＝ “暂停”)<br />     按钮4.标题 ＝ “恢复”<br />     暂停播放MP3 ()<br /> .否则<br />     按钮4.标题 ＝ “暂停”<br />     继续播放MP3 ()<br /> <br /> .如果结束<br /> <br /> <br /> .子程序 _标签1_反馈事件, 整数型<br /> .参数 参数一, 整数型<br /> .参数 参数二, 整数型<br /> <br /> hk条1.位置 ＝ 参数一<br /> <br /> .子程序 _hk条1_位置被改变<br /> <br /> 同步播放MP3 (文件框1.目录 ＋ “\” ＋ 文件框1.被选择文件, hk条1.位置, 标签1, )<br /> <br /> .子程序 _横向滚动条1_位置被改变<br /> .局部变量 音量, 整数型<br /> <br /> 系统音量1.打开 (4)<br /> 音量 ＝ 系统音量1.取最大音量 () ÷ 横向滚动条1.最大位置 × (横向滚动条1.最大位置 － 横向滚动条1.位置)<br /> 系统音量1.置音量 (音量, 音量)<br /> <br /> .子程序 _播放音乐<br /> <br /> hk条1.位置 ＝ 1<br /> 同步播放MP3 (文件框1.目录 ＋ “\” ＋ 文件框1.被选择文件, hk条1.位置, 标签1, )

补充内容 (2025-2-19 16:02):
我自己做的相对的一个比较好的成品，都是根据这个写的
https://bbs.125.la/forum.php?mod ... rtype=1#pid29833519

wh1234567

MP4如何播放？期待完善界面上的此功能

please

感谢分享，支持开源！！！

fjsystem

音量hk怎么反向拉?

hbqjb

简单易学，方便好用！

year1970

感谢分享

please

感谢分享，支持开源！！！

查过

感谢分享，很给力！~

豆豆灰常开心

下个学习一下

bianyuan456

已经顶贴，感谢您对论坛的支持！