为何我的delphi7的这个程序播放不出avi视频

mediaplayer也是调用系统的解码器来进行文件的播放，如果系统没有安装相应解码器那肯定是播放不了的
你的那些后缀为avi的不一定真实格式就是avi的
到网上下个解码器试试看呢

1。用绝对路径试试，不要只'aa.avi',这样程序有可能找不到；
2。指定DeviceType属性为dtAVIVideo;下面是帮助里的例子：
var sWinDir: String;

iLength: Integer;
begin
// Initialize Variable
iLength := 255;
setLength(sWinDir, iLength);
iLength := GetWindowsDirectory(PChar(sWinDir), iLength);
setLength(sWinDir, iLength);

With MediaPlayer1 do begin
Filename := sWinDir + '\Clock.avi'; //specify video file
DeviceType := dtAVIVideo; //set Device compatibility to AVI
Display := Panel1; //Set display device to a TPanel
Open;
Play;
end;
end;

加解码器就行了

var