PictureBoxでのアニメーションのちらつきをなくすには？

解決

Toshi 2003-02-04 07:03:06 No: 105991

タイマーを使って，以下のような感じで PictureBox にCircleを動かす簡単なアニメーションを作成しているのですが，Timer.Interval=10で描画がかなりちらついてしまいます．
この場合，ちらつきを無くすような方法はありませんでしょうか．
よろしくお願いします．

Private Sub Timer1_Timer()
Picture1.Cls
Picture1.Circle (x,y), 30, vbRed
x = x + 1
y = y + 1
End Sub

Aikisu URL 2003-02-04 07:07:43 No: 105992

見当違いでしたらすみません。

私もサークルを描画しグリグリ動かすプログラムを作りましたが、その際にDirectX(DirectDraw)を利用しました。
PictureBoxで描くより高速です。
が、管理もやや複雑、、、一度お試しあれ。

ちなみに、DirectDrawを利用する為の関数をVB用に開発されてる方はかなりいます。
Vector等で検索してみては？

Toshi 2003-02-05 10:09:02 No: 105993

たしかにDirectXでダブルバッファしたところ，ちらつかなくなりました．
どうもありがとうございました m(__)m