名前
題名
▼ Mr.XRAYさん > > [AVIファイルの動作について] > > http://hpcgi3.nifty.com/e-papy/DelphiBBS/wwwlng.cgi?print+201512/15120004.txt > > 質問された方のレスにある「表示するけど動かない」 > というのは，例えば，以下の図は，両方とも「表示しているけど動かない」 > です． > この文章だけだと，具体的に状況が... 分かりませんね． > 「何が，どのように」というように書いてないので． > ましてや「動作しません」じゃ，何がどう動作しないのか全く不明です． > それにしても，不思議です．どうしてなのかな ? > > ちなみに，前の書き込みの 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; >
GIF,JPEG,PNG画像ファイル及びLZH,ZIPファイルをアップロードできます.
600 x 1200 ピクセルを超える画像は縮小表示されます(画像クリックで拡大表示).
(上限122000(120k)バイト)

削除キー Link