mp3播放器 by TK QQ：86935367

.版本 2

.程序集 窗口程序集1

.子程序 _按钮_暂停_被单击

.如果 (全局变量_暂停或者继续)  ' 为真表示当前为暂停
    全局变量_暂停或者继续 ＝ 假  ' 按钮按下后改变为假，即继续，同时暂停播放
    暂停播放MP3 ()
    按钮_暂停.标题 ＝ “继续”
.否则
    全局变量_暂停或者继续 ＝ 真
    按钮_暂停.标题 ＝ “暂停”
    继续播放MP3 ()
.如果结束




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

全局变量_暂停或者继续 ＝ 真


.子程序 _按钮_浏览_被单击

.如果真 (通用对话框_浏览.打开 ())
    编辑框_浏览.内容 ＝ 通用对话框_浏览.文件名
.如果真结束


.子程序 _按钮_播放_被单击

.如果 (编辑框_浏览.内容 ＝ “”)
    信息框 (“请点击浏览添加MP3文件”, 0, “提示”)
    返回 ()
.否则

.如果结束
播放MP3 (, 编辑框_浏览.内容)


.子程序 _按钮_停止_被单击

停止播放 ()

　　感觉比较难办的就是暂停和播放的切换，要在一个按钮上实现，通过一个全局变量来实现的。

.版本 2

.全局变量 全局变量_暂停或者继续, 逻辑型, , , 用来标注是暂停还是继续,初始化为真，表示显示暂停 

　　

下载地址：https://files.cnblogs.com/tk091/MP3%E6%92%AD%E6%94%BE%E5%99%A8.zip