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

タイトル ： 同一イメージでのDrawImageが転送されない
投稿日： 2007/11/06(Tue) 23:50
投稿者： TK
同一PicyureBox間でDrawImageを行っても表示されません。
同じ呼び出し方法で転送先を別のPictureBoxの場合は転送されます。
どうすれば同一PictureBox内でのイメージ転送ができるか教えてください。

Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
        Dim g As Graphics
        Dim g2 As Graphics

        With PictureBox2
            .Image = New Bitmap(.Width, .Height)
            g = Graphics.FromImage(.Image)
        End With
        With PictureBox3
            .Image = New Bitmap(.Width, .Height)
            g2 = Graphics.FromImage(.Image)
        End With

        Dim f As New Font("ＭＳ Ｐゴシック", 14)
        g.DrawString("テスト", f, Brushes.Blue, 10, 10)

        Dim rect1 As New Rectangle(0, 0, 100, 100)
        Dim rect2 As New Rectangle(200, 0, 100, 100)
        g.DrawImage(PictureBox2.Image, rect2, rect1, GraphicsUnit.Pixel) '[1]
        g2.DrawImage(PictureBox2.Image, rect2, rect1, GraphicsUnit.Pixel) '[2]

        f.Dispose()
        g.Dispose()
        g2.Dispose()
    End Sub

[1]でPictureBox2の内容を PictureBox2に転送しています。これがうまく行きません。
[2]のPictureBox3へのDrawImageはうまく行きます。

以上です。よろしくお願いします。
- 関連一覧ツリー （ をクリックするとツリー全体を一括表示します）

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