Формочка без шапки

[asya]

Как бы мне сделать формочку без шапки верхней, но чтобы таскать можно было легко по всей поверхности экрана.

[lord0n]

Как бы мне сделать формочку без шапки верхней, но чтобы таскать можно было легко по всей поверхности экрана.

Поставь форм болдерстаил в нон и обрабатывай движения мыши при зажатой кнопке

[Alex[fj]]

Таскаем форму за любое место

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

Private Sub Form1_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles MyBase.MouseDown
        If e.Button = Windows.Forms.MouseButtons.Left Then
            IsMouseDown = True 'IsMouseDown as Boolean
            MouseOffset.X = e.X ' MouseOffset as System.Drawing.Point
            MouseOffset.Y = e.Y
        End If
    End Sub

    Private Sub Form1_MouseUp(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles MyBase.MouseUp
        IsMouseDown = False
    End Sub

    Private Sub Form1_MouseMove(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles MyBase.MouseMove
        If IsMouseDown Then
            Me.Location = New Point( _
                Me.Location.X + e.X - MouseOffset.X, _
                Me.Location.Y + e.Y - MouseOffset.Y)
        End If
    End Sub


А вообще, пример распространенный, и его уже много раз выкладывали. Можно еще по поиску побродить...

[lord0n]

надо это дело в кирпичи запихнуть
и всех отсылать туда

[asya]

Спасибо!