Déplacement d'une form n'ayant pas de barre titre

Soyez le premier à donner votre avis sur cette source.

Snippet vu 7 382 fois - Téléchargée 29 fois

Contenu du snippet

Imaginer que vous avez une fenêtre avec la propriété BoderStyle à None, c'est à dire sans bordure et sans bare de titre, a l'origine impossible de déplacer cette form donc voici un code qui permet de déplacer celle-ci simplement.

Comme je débute en .net , je fais de mon mieux lol

Source / Exemple :


#Region "Déclaration des variables"

    Dim Position_Souris_X As Integer
    Dim Position_Souris_Y As Integer
    Dim Variation_Position_Souris_X As Integer
    Dim Variation_Position_Souris_Y As Integer

#End Region

    Private Sub Form1_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles MyBase.MouseDown
        Position_Souris_X = e.X
        Position_Souris_Y = e.Y
    End Sub

    Private Sub Form1_MouseMove(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles MyBase.MouseMove
        If Me.MouseButtons = MouseButtons.Left Then
            Variation_Position_Souris_X = e.X - Position_Souris_X
            Variation_Position_Souris_Y = e.Y - Position_Souris_Y
            Me.Left = Me.Left + Variation_Position_Souris_X
            Me.Top = Me.Top + Variation_Position_Souris_Y
        End If
    End Sub

Conclusion :


Voilà c'est tout

Utile aussi pour attribuer cette méthose à un objet, ou encore votre propre barre titre dessinée :p

A voir également

Ajouter un commentaire

Commentaires

Messages postés
69
Date d'inscription
samedi 25 décembre 2004
Statut
Membre
Dernière intervention
21 août 2008

Sous vs2005, il signale qu'il faut utiliser :
- If Control.MouseButtons = ...
plutot que :
- If Me.MouseButtons = ...
Sinon le code fonctionne nickel.
Messages postés
473
Date d'inscription
mercredi 7 août 2002
Statut
Membre
Dernière intervention
10 juin 2015

voir aussi :
http://www.vbfrance.com/code.aspx?ID=17548
et
http://www.vbfrance.com/code.aspx?ID=17715
Le principe est le même, mais comble du luxe, je rends magnétique la form ou le control déplacé
Messages postés
207
Date d'inscription
jeudi 21 novembre 2002
Statut
Membre
Dernière intervention
29 mars 2006

Bon, je crois que ça dérangera personne si je poste mes versions de convertisseur euro-francs et de créateur de msgbox ??
Et oui labout, je vous ai tous à l'oeil, et tous ceux qui posteront un truc déjà dispo auront à faire à moi...
Mwahahahaha (rire de sadique)
@+
Messages postés
1356
Date d'inscription
samedi 8 décembre 2001
Statut
Membre
Dernière intervention
23 octobre 2006
7
ne t'en fait pas spy166 veille. J'y ai eu droit moi aussi.
@+
Messages postés
62
Date d'inscription
dimanche 16 septembre 2001
Statut
Membre
Dernière intervention
21 septembre 2006

Quand on marque déjà postée , c'est pour une source identique autrement dit plagia , ici c'est pas le cas moi je montre ma façon de procédé pour obtenir le même résultat
Afficher les 6 commentaires

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.