Quantcast
Channel: Windows Forms General forum
Viewing all articles
Browse latest Browse all 12583

Texturebrush and FillEllipse problem

$
0
0

Hi, i have the following code which loads a bmp from my resources. this image is a 24bit 24x24 bmp.

Private Sub Button2_Click(sender As System.Object, e As System.EventArgs) Handles Button2.Click
        Dim m_texturebrush As TextureBrush = Nothing
        Dim _image As Image = Nothing
        Try
            Dim g As Graphics = CreateGraphics()
            _image = New Bitmap(My.Resources.refresh)
            m_texturebrush = New TextureBrush(_image, New Rectangle(0, 0, 24, 24))
            'm_texturebrush.WrapMode = WrapMode.Clamp
            g.FillEllipse(m_texturebrush, Width - 50, 0, 24, 24)
            g.Dispose()
            _image.Dispose()
            m_texturebrush.Dispose()
        Catch ex As Exception
            'MsgBox(ex.Message)
        End Try
    End Sub

problem is i cannot seem to get Wrapmode.clamp to work. i want the 24x24 image displayed in a circle with a 24 radius. however my results are not right. i'm getting titled images that seem flipped.

Can anyone help me out.

Gary


Viewing all articles
Browse latest Browse all 12583

Latest Images

Trending Articles



Latest Images

<script src="https://jsc.adskeeper.com/r/s/rssing.com.1596347.js" async> </script>