Déplacer une fenaitre ??? [ RESOLU ]

Bonjour ,

Comment peut-on déplacer une fenaitre sachant que la propriété: " FormBorderStyle " est sur " none " .?????

Merci ,

Cordialement ,
Le réparateur de PC

SZ ne sais pas encore manipuler la souris et autre. Donc voila la code --"

Dans la racine de ta fenêtre (premier onglet dans l'éditeur de fonctions), avec Exécuter du code vb.net, met :

Code:

Private IsFormBeingDragged As Boolean = False 'Used for custom move code, scroll down to see the actual code.
    Private MouseDownX As Integer
    Private MouseDownY As Integer

Ensuite, Si tu veux que l'on puisse déplacer la fenêtre via la fenêtre elle même, ou un autre contrôle (panel par exemple), lie une fonction à l'évènement MouseMove de celui-ci et met :

Code:

If IsFormBeingDragged Then
            Dim temp As Drawing.Point = New Drawing.Point()
            temp.X = Me.Location.X + (e.X - MouseDownX)
            temp.Y = Me.Location.Y + (e.Y - MouseDownY)
            Me.Location = temp
            temp = Nothing
        End If

Évènement MouseDown de ce même composant :

Code:

If e.Button = System.Windows.Forms.MouseButtons.Left Then
            IsFormBeingDragged = True
            MouseDownX = e.X
            MouseDownY = e.Y
        End If

Et enfin, pour MouseUp :

Code:

If e.Button = System.Windows.Forms.MouseButtons.Left Then
            IsFormBeingDragged = False
        End If

Voila, copie le code tel quel sans le modifier

@+ ^^

re ,

MERCI !!!!

Sujet résolu !!!

Cordialement ,
Le réparateur de PC