delphi 播放mp3

 

mp1: TMediaPlayer;

mp1.FileName := ExtractFilePath(Application.Exename)+'凉凉.mp3';
mp1.Open;
mp1.Play;

 

可参考

http://www.cnblogs.com/pchmonster/archive/2012/07/12/2588846.html

posted @ 2017-03-12 21:23  夏天的西瓜君  阅读(1041)  评论(0)  编辑  收藏  举报