Discussion :

[shayw]

Bonjour

Sur un toolstrip j'ai placé un toolstripdropdownbutton nommé ToolStripDropDownmanage
celui ci comprend un toolstripdropdownmenu avec des toolstripmenuitem
j'ai deux évenements

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
Private Sub ToolStripDropDownmanage_MouseEnter(ByVal sender As Object, ByVal e As System.EventArgs) Handles ToolStripDropDownmanage.MouseEnter
        DirectCast(sender, ToolStripDropDownButton).ShowDropDown()
    End Sub
    Private Sub ToolStripDropDownmanage_MouseLeave(ByVal sender As Object, ByVal e As System.EventArgs) Handles ToolStripDropDownmanage.MouseLeave
         DirectCast(sender, ToolStripDropDownButton).HideDropDown()
    End Sub

Le problème est le suivant quand le ToolStripDropDownmanage_MouseEnter est levé un menu s'affiche ShowDropDown
mais si j'essaie de selectioner un des toolstripmenuitem alors ToolStripDropDownmanage_MouseLeave est levé donc le menu se ferme HideDropDown
J'aurais voulu que ToolStripDropDownmanage_MouseLeave soit levé seulement si je sors du toolstripdropdownbutton mais pas si je rentre dans le menu
ça pas l'air très clair
Merci

[M4arm]

Pourquoi n'utilises-tu pas un booléen pour le HideDropDown : tant que tu es sur le mouseHover du menuItem le booléen est vrai et dès que tu ne l'es plus, tu peux exécuter le HideDropDown.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
Private Sub ToolStripDropDownmanage_MouseEnter(ByVal sender As Object, ByVal e As System.EventArgs) Handles ToolStripDropDownmanage.MouseEnter
    DirectCast(sender, ToolStripDropDownButton).ShowDropDown()
End Sub
Private Sub ToolStripDropDownmanage_MouseLeave(ByVal sender As Object, ByVal e As System.EventArgs) Handles ToolStripDropDownmanage.MouseLeave
    If Not MouseHoverMenuItem
        DirectCast(sender, ToolStripDropDownButton).HideDropDown()
    End If
End Sub

[shayw]

tant que tu es sur le mouseHover du menuItem le booléen est vrai et dès que tu ne l'es plus, tu peux exécuter le HideDropDown.

Je pense il doit avoir une solution plus simple
j'ai essayé aussi de cette façon

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
Private Sub form1_MouseEnter(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.MouseEnter
 
   ToolStripDropDownmanage.HideDropDown()
 
    End Sub
 
 Private Sub ToolStripDropDownmanage_MouseEnter(ByVal sender As Object, ByVal e As System.EventArgs) Handles ToolStripDropDownmanage.MouseEnter
        DirectCast(sender, ToolStripDropDownButton).ShowDropDown()
 
    End Sub

ici bizarre le ToolStripDropDownmanage.HideDropDown() du form1_MouseEnter n'a aucun effet