把AVI存在资源中用TAnimate播放

Animate1.RESName := 'About';
  Animate1.Active := True;