tagCANDY CGI VBレスキュー(花ちゃん) の Visual Basic 2010 用 掲示板(VB.NET 掲示板)
VBレスキュー(花ちゃん) の Visual Basic 2010 用 掲示板(VB.NET 掲示板)
[ツリー表示へ]  [ワード検索]  [Home]

タイトル Re^2: 画像の回転について
投稿日: 2008/01/13(Sun) 22:18
投稿者もりまさ
Hongliangさん、返答ありがとうございます。
いろいろ検索してみて処理を編集してみました
しかし、RotateTransformを180度にしてみるとGIFアニメが1コマ目しか表示されません。
(90、270などはアニメーションされます)
私のソースに問題があるのでしょうか。

    Private P_image As System.Drawing.Bitmap

    Private Sub Form_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        P_image = New Bitmap("C:\anim.gif")
        AddHandler Me.Paint,New PaintEventHandler(AddressOf Me.Form_Paint)
        System.Drawing.ImageAnimator.Animate(P_image, _
            New EventHandler(AddressOf Me.Image_FrameChanged))
    End Sub

    Private Sub Image_FrameChanged(ByVal o As Object, ByVal e As EventArgs)
        Me.Invalidate()
    End Sub

    Private Sub Form_Paint(ByVal sender As Object, _
            ByVal e As PaintEventArgs)
        System.Drawing.ImageAnimator.UpdateFrames(P_image)
        e.Graphics.TranslateTransform(70, 70)
        e.Graphics.RotateTransform(180)
        e.Graphics.DrawImage(P_image, 0, 0)
    End Sub

- 関連一覧ツリー をクリックするとツリー全体を一括表示します)

古いスレッドにレスはつけられません。