Закруглить углы формы(при FormBorderStyle = None)

[Lamer_Pavel]

У меня есть форма без границ,её фон - картинка.
Как мне закруглить её края?

[Viper]

Установить для формы регион нужной формы, свойство Region. А региону задать форму скругленного прямоугольника.

[Lamer_Pavel]

Что мне выбрать из выпадающего списка?

[Gloom]

Код: Выделить всё

    <DllImport("gdi32")> _
    Public Function CreateRoundRectRgn( _
        ByVal nLeftRect As Integer, _
        ByVal nTopRect As Integer, _
        ByVal nRightRect As Integer, _
        ByVal nBottomRect As Integer, _
        ByVal nWidthEllipse As Integer, _
        ByVal nHeightEllipse As Integer) As IntPtr
    End Function

...
    Me.Region = System.Drawing.Region.FromHrgn(CreateRoundRectRgn(0, 0, Me.Width, Me.Height, 20, 20))

[Gloom]

По правильному конечно DeleteObject надо не забыть:

Код: Выделить всё

    <DllImport("gdi32")> _
    Public Function DeleteObject(ByVal hObject As IntPtr) As Boolean
    End Function
...
    Dim Hrgn As IntPtr = CreateRoundRectRgn(0, 0, Me.Width, Me.Height, 20, 20)
    Me.Region = System.Drawing.Region.FromHrgn(Hrgn)
    DeleteObject(Hrgn)

[Lamer_Pavel]

Спасибо,работает.