Question

delphi，mediaplayer制作媒体播放器。

为什么不播放呢？

Answer 1

我用以下几句就可以播放：
procedure TForm1.Button1Click(Sender: TObject);
begin
if OpenDialog1.Execute then
begin
MediaPlayer1.FileName := OpenDialog1.FileName;
MediaPlayer1.Open;
MediaPlayer1.Play;
end;
先试试上面代码是否可以播放，如果不可以应当是你的播放文件的问题，选择用.mp3格式的试试。

追问

我想播视频，能播放音乐但不能播视频。

追答

你先试试用mediaplay打开你要播放的视频视频文件，看看能不能打开？我记得mediaplay很多视频文件都打不开的，需要视频解码的