Delphi播放有声的AVI动画,想知道Delphi如何播放AVI视频,这个源码是很好的例子,核心部分其实是基于Windows中内置的MediaPlayer播放器实现的,关于此播放器的播放,请参考以下代码:  procedureTForm1.FormCreate(Sender:TObject);  begin  self.MediaPlayer1.FileName:='clock.avi';  self.MediaPlayer1.Display:=self.Panel1;  self.MediaPlayer1.Open;  end;