| [9472] 表示するけど動かない | 返信 削除 |
| 2015/12/17 (木) 09:08:49 Mr.XRAY |
|
> [AVIファイルの動作について] > 質問された方のレスにある「表示するけど動かない」 というのは，例えば，以下の図は，両方とも「表示しているけど動かない」 です． この文章だけだと，具体的に状況が... 分かりませんね． 「何が，どのように」というように書いてないので． ましてや「動作しません」じゃ，何がどう動作しないのか全く不明です． それにしても，不思議です．どうしてなのかな ? ちなみに，前の書き込みの gif アニメは以下のコードで作成しました． {$WRITEABLECONST ON} procedure TForm1.Button1Click(Sender: TObject); const ID_Value : SmallInt = 1; begin Animate1.FileName := ExtractFilePath(Application.ExeName) + 'cool.avi'; Animate1.Play(ID_Value, ID_Value, 1); //ここに，このフォームの画像をキャプチャして保存するコード //実際のコードは省略 inc(ID_Value); if ID_Value >= Animate1.FrameCount then begin ShowMessage('END'); end; end;  |