见http://www.csdn.net/expert/topic/129/129818.shtm

解决方案 »

  1.   

    一个文档播放完会触发TMediaPlayer的OnNotify事件;
    可以是多个文件呀,用Opendialog,将Option中的ofAllowMultiSelect设为TRUE,在TMEdiaplayer的Notify中依次取Opendialog的Files[i]
      

  2.   

    ontimer事件可以在你必要时启动(比如按了play),在你不需要时关闭(比如按了stop):
    通过程序中设置ttimer的enable属性.
    可以一次读入多个文件名,将这些文件置于TStringList列中,(有个Files属性).
    mediaplayer可以读入多个文件,但好象不能顺序播放,放完第一首就自动停止了,也没深究,我见过的似乎都是另写程序实现。
      

  3.   

    初始化时加入一个Tstringlist 对象事例,保存歌名=opendialog.files,加入一个Ttimer,在ontime 事件中
    读mediaplayer.mode , 如果=mpstopped 从Tstringlist中读取下一个文件名,设置mediaplayer.filename-->mediaplayer.open-->mediaplyer.play,
    一切搞定
      

  4.   

    连续播放可以用miscrosoft 的mediaplayer,import activex component,播放之前建立*.asx