گرد کردن تصاویر

سلام دوستان چگونه یک تصویر داخل پیکچرباکس را در موقع نمایش بصورت دایره یا همان گرد نمایش بدهیم با تشکر از دوستان

نقل قول:

---

نوشته شده توسط safari_m4

سلام دوستان چگونه یک تصویر داخل پیکچرباکس را در موقع نمایش بصورت دایره یا همان گرد نمایش بدهیم با تشکر از دوستان

---

    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

نقل قول:

---

نوشته شده توسط the king

    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

---

با تشکر فراوان و سپاسگزاری از شما دوست گرانقدر