Animateコントロールの使い方

アニメーションコントロールは，Audio Video Interleaved（AVI）クリップをサイレントで表示するウィンドウです。

アプリケーションの中でAVIファイルを再生するには

1. オブジェクトブラウザ（あるいはプログラムで）でFileNameプロパティに表示するAVIファイルを設定します。
2. Playメソッドを実行します。
3. PlayメソッドでFromFrameは表示したい先頭のフレーム（ふつう１）を指定します。
4. PlayメソッドでToFrameは表示する最後のフレームを指定します。AVIファイルの最後のフレームを指定したいときは０とします。
5. PlayメソッドでCountはくり返し回数です。０を指定するとStopメソッドが実行されるまで繰り返します。

例

procedure TForm1.BitBtn1Click(Sender: TObject);
begin
    // 先頭フレームから最終フレームまでStopメソッドが実行されるまで繰り返す。
    Animate1.Play(1, 0, 0);  
end;

procedure TForm1.BitBtn2Click(Sender: TObject);
begin
    Animate1.Stop;
end;