用TMediaPlayer播放AVI视频，选择AVI文件，并调用Play方法（或者点击Play按钮），如果使用默认的MediaPlayer设置，将会出现一个单独的窗口播放AVI视频。如下图：

也可以设置TMediaPlayer的Display属性为任何窗口组件（Windowed component），视频播放将会在这个组件的客户区（client area）中出现。

例如，在窗体上有一个pnl1的面板，想在这个pnl1面板上显示AVI视频，这时，应该按下面的代码设置Display属性：

mp1.Display := pnl1;

当AVI播放时，它将显示在面板中。如果视频大于面板矩形，视频将会被裁剪到面板大小。如下图：

可以通过设置DisplayRect属性来放大或缩小视频，代码如下：

mp1.DisplayRect := pnl1.ClientRect;

播放后效果如下：

Note

TAnimate组件（在Win32标签下）用于播放你在操作Windows时看到的小的视频，例如在Windows资源管理中拷贝文件或移动文件时看到的动画，如下图：

再例如查找文件时，查找对话框的动画。用TAnimate组件播放的AVI必须是未压缩的或仅进行过RLE压缩，其他的压缩形式都是不允许的。AVI中也不可以包含音频。

以上代码均在Delphi 7下测试通过，示例代码下载：AVIPlayer.rar

示例AVI视频下载地址：http://kuai.xunlei.com/d/RFJZWJPHLOIG