mp3播放器 by TK QQ:86935367
.版本 2 .程序集 窗口程序集1 .子程序 _按钮_暂停_被单击 .如果 (全局变量_暂停或者继续) \' 为真表示当前为暂停 全局变量_暂停或者继续 = 假 \' 按钮按下后改变为假,即继续,同时暂停播放 暂停播放MP3 () 按钮_暂停.标题 = “继续” .否则 全局变量_暂停或者继续 = 真 按钮_暂停.标题 = “暂停” 继续播放MP3 () .如果结束 .子程序 __启动窗口_创建完毕 全局变量_暂停或者继续 = 真 .子程序 _按钮_浏览_被单击 .如果真 (通用对话框_浏览.打开 ()) 编辑框_浏览.内容 = 通用对话框_浏览.文件名 .如果真结束 .子程序 _按钮_播放_被单击 .如果 (编辑框_浏览.内容 = “”) 信息框 (“请点击浏览添加MP3文件”, 0, “提示”) 返回 () .否则 .如果结束 播放MP3 (, 编辑框_浏览.内容) .子程序 _按钮_停止_被单击 停止播放 ()
感觉比较难办的就是暂停和播放的切换,要在一个按钮上实现,通过一个全局变量来实现的。
.版本 2 .全局变量 全局变量_暂停或者继续, 逻辑型, , , 用来标注是暂停还是继续,初始化为真,表示显示暂停
下载地址:http://files.cnblogs.com/tk091/MP3%E6%92%AD%E6%94%BE%E5%99%A8.zip