Discussion :

[cmon_compte]

Bonjour ,je voudrai savoir s'il est possible d'ajouter un popupmenu a un combobox sachant que l'evemnement qui doit déclancher le popupmenu est le click droit de la souris (sachant aussi que le combobox a par defaut sont popupmenu donc comment le désactiver et le remplacer avec un autre )
"sous vb6"
merci.

[ucfoutu]

Bonsoir,

Importance des mots ...!!!

1) le click sur une combo ne peut être reconnu que dans la zone de liste de la combo
2) la zone "éditable" ne répond pas à un évènement pouvant reconnaître, depuis VB, le bouton utilisé
3) la seule "pop-up" que je voie personnellement s'appelle le menu contextuel ouvert par VB sur click droit dans la zone éditable ...

Il va donc te falloir (c'est indispensable) être extrêmement précis sur ces points, en précisant (avec détails) ce que tu veux modifier, en cliquant sur quoi précisément et dans quel but précis ...

[cmon_compte]

En bref
Je veux afficher un menu contextuel en cliquant sur la zone éditable d’un combo box (avec un liste box ça marche très bien)

[ucfoutu]

Une listbox n'a pas de zone éditable...
Il ne t'est donc possible, dans une listbox, que d'ajouter un menu contextuel lors d'un évènement de souris dans la liste elle-même
Tu pourrais faire exactement la même chose, avec une combobox, mais également dans la zone de liste, pas dans la zone éditable qui, elle, n'est pas capable re reconnaître depuis VB le bouton pressé ...
Rien, ne t'empêche, maintenant, de reconstituer une combobox, qui n'est jamais que l'association d'une zone éditable (que tu peux remplacer par une textbox que tu peux doter d'un menu contextuel personnalisé) et d'une zone de liste (que tu peux remplacer par une listbox).
Tout celà, maintenant (je répète ma question) : pourquoi (dans quel but exact) ?.. car si cela se trouve, il y a peut-être beaucoup plus simple à mettre en oeuvre (si c'est par exemple pour empêcher un "coller" !...)

[cmon_compte]

je viens de comprendre j''ai suivi ton conseil j'ai reconstituer un combocox
mais le hik c'est meme le textbox me donne un menu contextuel par defaut
qui s'affiche avec le click droit

pour ta question : mon but avec le menu contextuel et le combobox c'est de pouvoir faire des mise a jour proposer dans le menu contextuel sur l'element selectionné dans le combo box tout en sachant que ce dérnier est dynamique

[ucfoutu]

je viens de comprendre j''ai suivi ton conseil j'ai reconstituer un combocox
mais le hik c'est meme le textbox me donne un menu contextuel par defaut
qui s'affiche avec le click droit

pour ta question : mon but avec le menu contextuel et le combobox c'est de pouvoir faire des mise a jour proposer dans le menu contextuel sur l'element selectionné dans le combo box tout en sachant que ce dérnier est dynamique

Bon...
Il faut alors que tu saches ce qui suit :
Il est toujours possible de supprimer ou modifier le menu contextuel d'une textbox, mais la chose passe nécessairement par le sous-classement (par Fonctions de l'Api de Windows) et on peut alors décider :
- soit de supprimer carrément le menu contextuel et d'écrire une code VB pour ouvrir une pop-up (à fabriquer) au click droit
- soit de substituer (-plus dur encore) au menu originel un menu "sur mesure"

Dans les deux cas de figure ci-dessus, une très bonne connaissance du sous-classement (toujours dangereux pour une appli si on ne sait pas le gérer parfaitement) est absolument indispensable.

Ce que tu exposes ne me parais pas nécessiter cette acrobatie (correspond-elle d'ailleurs aux connaisances que tu possèdes ?), puisqu'au bout du compte, ce que tu veux est (citation)

"pouvoir faire des mise a jour proposer dans le menu contextuel sur l'element selectionné dans le combo box"

Il te suffit alors d'un simple bouton additionnel contenant ton code et utilisant l'article sélectionné ! Ou encore (si tu veux éviter le bouton additionnel) d'utiliser l'évènement click-droit sur l'article sélectionné pour exécuter tes instructions !...

EDIT et afin qu'il n'y ait aucune espèce d'ambiguïté :

Il est clair que ce que je te propose s'applique au cas de la substitution (à la combobox) d'une textbox et d'une listbox, hein ...

et voilà comment récupérer l'article sélectioonné par ce click droit sur l'article PREALABLEMENT SELECTIONNE :

Code :

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

1
2
3
4
5
Private Sub List1_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)
 If Button = 2 Then
   MsgBox "tu as cliqué sur l'article " & List1.ListIndex & " qui dit " & List1.List(List1.ListIndex)
 End If
End Sub

C'est tout et c'est simple ...