怎样使Media player控件发出声音?(50分)

  • 主题发起人 主题发起人 三点
  • 开始时间 开始时间

三点

Unregistered / Unconfirmed
GUEST, unregistred user!
我想试试Delphi5自带的Media player怎样发出声音,就在窗体上加了一个Media player控件,加了一个Button,一个panel,写了几句话如下:
procedure TForm1.Button1Click(Sender: TObject);
begin

MediaPlayer1.Filename := 'C:/winnt/clock.avi';
MediaPlayer1.DeviceType := dtAVIVideo;
MediaPlayer1.Display := Panel1;
MediaPlayer1.Open;
MediaPlayer1.Play;
end;

但是我点击Button1后却没有声音,是怎么回事呢?
 
MediaPlayer1.DeviceType := dtAVIVideo去掉
 
后退
顶部