View Full Version : گرد کردن تصاویر
  
safari_m4
جمعه 07 آذر 1399, 23:08 عصر
سلام دوستان چگونه یک تصویر داخل پیکچرباکس را در موقع نمایش بصورت دایره یا همان گرد نمایش بدهیم با تشکر از دوستان
the king
شنبه 08 آذر 1399, 05:04 صبح
سلام دوستان چگونه یک تصویر داخل پیکچرباکس را در موقع نمایش بصورت دایره یا همان گرد نمایش بدهیم با تشکر از دوستان
    Private Sub PictureBox1_Paint(sender As Object, e As PaintEventArgs) Handles PictureBox1.Paint
        Dim pic = CType(sender, PictureBox)
        Dim rect = New Rectangle(Point.Empty, pic.Size)
        Using path = New Drawing2D.GraphicsPath()
            path.AddEllipse(rect)
            e.Graphics.SetClip(path, Drawing2D.CombineMode.Exclude)
            Using b = New SolidBrush(pic.BackColor)
                e.Graphics.FillRectangle(b, rect)
            End Using
        End Using
    End Sub
safari_m4
دوشنبه 10 آذر 1399, 15:43 عصر
Private Sub PictureBox1_Paint(sender As Object, e As PaintEventArgs) Handles PictureBox1.Paint
        Dim pic = CType(sender, PictureBox)
        Dim rect = New Rectangle(Point.Empty, pic.Size)
        Using path = New Drawing2D.GraphicsPath()
            path.AddEllipse(rect)
            e.Graphics.SetClip(path, Drawing2D.CombineMode.Exclude)
            Using b = New SolidBrush(pic.BackColor)
                e.Graphics.FillRectangle(b, rect)
            End Using
        End Using
    End Sub
با تشکر فراوان و سپاسگزاری از شما دوست گرانقدر
 
vBulletin® v4.2.5, Copyright ©2000-1404, Jelsoft Enterprises Ltd.