tbtoolbar vb6 - Help!

Question

j'arrive pas à gérer les états de boutons presses et nonpresses.
tbToolBar(Index).Buttons(Button.Index).Value = tbrPressed

comme si je ne pouvais que lire .value et pas le modifier

y a quelque chose que j'ai oublié?

Renfield · Answer

Et si tu testais Button.Value ?
By Renfield

[mailto:thomas_reynald@msn.com thomas_reynald@msn.com]

Aucune touche n'a ete blessee lors de la saisie de ce texte.......... ;)

ld40 · Answer

j'ai ecris ça maintenant:

Private Sub tbToolBar_ButtonClick(Index As Integer, ByVal Button As MSComctlLib.Button)
...

            If Button.Value = tbrPressed Then
                Button.Value = tbrUnpressed
            Else
                Button.Value = tbrPressed
            End If

...
end sub


et c'est pareil.

pas à pas la valeur se modifie, le bouton s'enfonce.
Mais lorsque je re-clique dessus, button.value n'est plus à jour et mon code essaye d'enfoncer un bouton déjà enfoncé.

il n'y a aucun autre traitement sur la toolbar dans mon code.

NB:Bien sûr je peux gérer un bool mais c'est stupide.

Peux tu me confirmer que ça marche chez toi?

ld40 · Answer

:blush) 
bon ben voilà , j'ai un peu honte, mais j'ai trouvé.
il suffisait d'un bête "refresh":


Button.Value = tbrPressed
tbToolBar(Index).refresh


milles excuses.
 ?-)

ld40 · Answer

ok pour l'exemple iif

merci beaucoup. ;) 

NB:le refresh marche très bien.

Tbtoolbar vb6 - Help!

4 réponses

Discussions similaires