.版本 2

.程序集 窗口程序集1

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

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




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

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


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

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


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

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

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


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

停止播放 ()

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

.版本 2

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

  

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

版权声明:本文为tk091原创文章,遵循 CC 4.0 BY-SA 版权协议,转载请附上原文出处链接和本声明。
本文链接:https://www.cnblogs.com/tk091/archive/2012/05/27/2520565.html