Bonjour,
Avec la fonction mouseup:
Je récupère la position X en twips du curseur. En fonction du click de souris, je désire positionner une étiquette sur cette position X.
Code : Sélectionner tout - Visualiser dans une fenêtre à part Private Sub etiq_G1_MouseUp(Button As Integer, Shift As Integer, X As Single, Y As Single)
J'applique donc le X sur la propriété left de l'étiquette:
source:
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5 Private Sub etiq_G1_MouseUp(Button As Integer, Shift As Integer, X As Single, Y As Single) Me.etiq_G1.Left = X End Sub
http://msdn.microsoft.com/en-us/libr...ice.15%29.aspx
Si mon étiquette part d'une position left=0, pas de problème, c'est quand elle part d'une position autre que ça se gâche...
Il doit me manquer une conversion de valeur parce que l'étiquette se déplace en des endroits plus ou moins aléatoires.
Des idées?
Merci!
Partager