TMediaPlayer控件播放mp3文件最精简的程序,为什么在一台机器上可以播放,而在另一台机器上却提示“无法确定MCI设备类型”?请高手指教,谢谢。
procedure TForm1.Button1Click(Sender: TObject);
begin
  if OpenDialog1.Execute then
    begin
    MediaPlayer1.FileName := OpenDialog1.FileName;
    MediaPlayer1.Open;
    MediaPlayer1.Notify := True;
    end;
end;

解决方案 »

  1.   

    上面第七行是:
    MediaPlayer1.Play;
      

  2.   

    打开windows media player工具--选项---文件类型,将mp3音频文件勾选上就可以了
      

  3.   

    用这个控件不如用realplay控件,更简单一些
      

  4.   

    失踪的月亮:
    你的方法可行吗(我还没试过)?
    1、在可以播放的机器上去掉Windows Media Player 工具-选项-文件类型-mp3音频文件的勾(重启电脑),此程序仍可播放。
       事实上,在正常播放的机器上,Windows Media Player 工具-选项-文件类型-mp3音频文件选项,本来就是未勾选的。
    2、在不能播放的机器上,TMediaPlayer 控件可以播放WAV文件,其他文件基本不行。
    3、是不是由于TMediaPlayer控件内部代码的兼容性问题导致的这个现象?请高手指教。
      

  5.   

    itmes:
    本人是个菜鸟,这个RealPlay控件,在哪儿,如何安装?
      

  6.   

    如果你电脑里装了realplay,那么在delphi中“组件-》导入Active X控件”中选择realplay插件安装就可以了
    安装成功后在组件栏的Active X面板能发现