(Resolved) Move Form with no ControlBox in MDI

[Wynder]

Greetings folks..

I have a FixedToolWindow with no ControlBoxthat I want folks to be able to click inside of the form and drag around the MDI Parent.

Any easy way to accomplish this?

[pax]

Hi.

Try this...

Dim MyOffSet As Point
 
    Private Sub Form1_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles MyBase.MouseDown
        If e.Button = MouseButtons.Left Then
            MyOffSet = New Point(Cursor.Position.X - Me.Location.X, Cursor.Position.Y - Me.Location.Y)
        End If
 
    End Sub
 
    Private Sub Form1_MouseMove(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles MyBase.MouseMove
        If e.Button = MouseButtons.Left Then
            Me.Location = New Point(Cursor.Position.X - MyOffSet.X, Cursor.Position.Y - MyOffSet.Y)
        End If
    End Sub

[Wynder]

Pax,

Friggen beautiful.

Danke,
Rob