Drag d'un control sur le click

Question

Bonjour,
je désirerais avoir de l'aide sur le "comment" déplacer un control sur un Form.

Quand j'essaie, avec un timer au 100ms, d'affecter ma position de souris a la location du contrôle il se trouve a avoir un énorme vide entre le curseur et le dit contrôle. Je ne sais vraiment pas pourquoi! Peut-être il essaie d'affecter la position de la souris relative a l'écran entier , si c'est le cas alors comment obtenir la position de la souris a l'intérieur d'un container, exemple: Form?

---
Dim l As New Point
l.X = MousePosition.X
l.Y = MousePosition.y

<nom_du_control>.location = l
---

Merci d'avance!...

CodeIX · Answer

Bon,
j'ai "bypasser" cela de façon un peu barbare en mettant au Timer_tick de mon custom control:

---
Dim l As New Point

l.X = MousePosition.X - Parent.Location.X - 50
l.Y = MousePosition.Y - Parent.Location.Y - 50

Me.Location = l
---

Par contre j'aimerais croire qu'il y a quelque chose de mieu et plus absolue. :)

Drag d'un control sur le click

1 réponse

Votre réponse

Discussions similaires