Info Bulle sur ComboBox

Question

Bonjour,

J'ai besoin de votre aide !!
Je souhaite faire apparaitre une info-bulle pour chacun des champs de la combo, mais lorsqu'ils sont en surbrillance et sans avoir  &#224;cliquer sur le champ.
En cherchant sur le net, j'ai trouv&#233; qu'il s'agit de la propri&#233;t&#233; ItemTips.
Le probl&#232;me est que cette propri&#233;t&#233; n'existe pas dans ma version de VB. En cherchant encore sur le net, il s'av&#232;re que j'ai besoin de l'ocx comctl32.ocx
Je l'ai install&#233;, mais rien n'a chang&#233;. Je n'ai plus d'id&#233;e ...

Merci d'avance pour votre aide ...

Sylvie

cs_drahcir · Answer

Salut,

utilise l'&#233;v&#232;nement MouseMove de ta combobox. Avec le System.Windows.Forms.MouseEventArgs en param&#232;tre, tu r&#233;cup&#232;re les coordonn&#233;es de ta souris ensuite tu peux afficher une info-bulle (ToolTip)

@+

sylpar · Answer

Je veux bien, mais il n'existe pas d'&#233;v&#233;nement MouseMove sur une Combobox !!
Merci quand m&#234;me

@+

cs_drahcir · Answer

tu es en vb ou en vb.net? Si tu es en vb.net &#231;a existe.....
si tu es en vb, je ne peut rien pour toi, d&#233;sol&#233;

jpleroisse · Answer

Bonsoir,

En VB6, la seule fa&#231;on d'avoir une infobule sur chaque Item d'un
Combobox est celle-ci. Evidemment, si tu as 100 Items, alors-l&#224;, &#231;a
fais des lignes de codes.



Private Sub Combo1_Click()

Select Case Combo1.ListIndex

    Case 0

    Combo1.ToolTipText = "Bonjour, comment vas-tu ?"

    Case 1

    Combo1.ToolTipText = "Merci et toi ?"

    Case 2

    Combo1.ToolTipText = "Au revoir, &#224; la prochaine."

End Select

End Sub



Private Sub Form_Load()

Combo1.AddItem "Jean"

Combo1.AddItem "Pierre"

Combo1.AddItem "Marcel"

Combo1.ListIndex = 0

End Sub



jpleroisse

(Si la r&#233;ponse te convient, clique r&#233;ponse accept&#233;e)

Info Bulle sur ComboBox

4 réponses

Discussions similaires