delphi MediaPlayer循环播放MP3所有音乐文件问题？

本文整理自网络，侵删。

 
MediaPlayer用得不多， 只知道这种办法， . 假如你已有一个ListBox1并已经装载好全部MP3的完整路径信息了， 可以加一个TIMER1， 在 TIMER1的事件里写代码跟踪播放器的模式， 一停止即播放下一首歌.procedure TForm1.Timer1Timer(Sender: TObject)；
begin
  if MediaPlayer1.Mode=mpStopped then
  begin
    ListBox1.itemindex:=ListBox1.itemindex+1；
    MediaPlayer1.FileName:=ListBox1.Items[ListBox1.itemindex]；
    MediaPlayer1.Close；
    MediaPlayer1.Open；
    MediaPlayer1.Play；。
 

相关阅读 >>

用Delphi内嵌汇编实现�载任意进程的某个dll

Delphi idhttp中get 图像链接通过memorystream加载 image控件显示

Delphi中查找进程及强行结束进程的方法

Delphi 获取网站验证码的图片

Delphi 结构体的使用、tbitmap和tmemorystream的转换

Delphi研究之驱动开发篇（二）--工具及环境搭建

Delphi - 利用dll编程控制摄像头实现拍照、录制视频

Delphi 文件crc和md5校验

Delphi 如何判断html编码格式，解决乱码问题

Delphi post数据与对应的接收方式

更多相关阅读请进入《Delphi》频道 >>

转载请注明出处：木庄网络博客 » delphi MediaPlayer循环播放MP3所有音乐文件问题？