Bonjour à tous,
Voila j'ai un petit souci avec les coordonnées souris. Je m'explique :
J'ai une form sur laquelle je dépose des panel et qui se redimensionne automatiquement si celle-ci est trop petite (propriété AutoScroll = True). Un rectangle shape suit la position de la souris lors de ses déplacements. Ceci pour positionner correctement mes panel.
Or je me rends compte que lorsque j'utilise le scrollbar, la position du pointeur de souris et du rectangle shape sont décalés. Comment résoudre ce probléme ?
<code basic> Private Sub FeuilleProjet_MouseMove(sender As Object, e As MouseEventArgs) Handles Me.MouseMove
If ModeEdition = EnumMode.Schéma Then
CurseurTableSouris.Top = (e.Y \ PasGrille) * PasGrille
CurseurTableSouris.Left = (e.X \ PasGrille) * PasGrille
End If
End Sub
</code>
J'ai résolu mon probléme en utilisant la propriété AutoScrollPosition de ma Form.