Bonjour,
j'ai 2 MSFlexGrid côté à côté, avec 1 scrollbar sur la Grid de gauche (PanneauLeft) et pas celle de droite (PanneauRight).
Je veux synchroniser le scroll, j'écris donc :
Ainsi quand je scrolle la MSFlexgrid de gauche, celle de droite doit s'aligner automatiquement.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3 Private Sub PanneauLeft_Scroll() PanneauRight.TopRow = PanneauLeft.TopRow End Sub
Le problème est :
- si PanneauRight.Scrollbars = flexScrollBarVertical , cela fonctionne bien mais j'ai une scrollbar dans PanneauRight
- si PanneauRight.Scrollbars = flexScrollBarnone , je n'ai plus de scrollbar dans PanneauRight mais il n'y pas alignement non plus. En gros .topRow reste à 1.
Je sais que je peux définir un event PanneauRight_Scroll mais ça ne m'intéresse pas. Je ne veux pas de scrollbar.
Du coup, j'ai réussi à pallier au problème en écrivant :
Est-ce que c'est un comportement normal ou j'ai raté quelque chose ??
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5 Private Sub PanneauLeft_Scroll() PanneauRight.ScrollBars = flexScrollBarVertical PanneauRight.TopRow = PanneauLeft.TopRow PanneauRight.ScrollBars = flexScrollBarNone End Sub
Sergio
Partager