Menu Contextuel dans une Listview en VB .NET

Question

J'utilise une listview et j'affiche un menu contextuel (avec modifier et supprimer) &#224; l'emplacement du curseur de la souris lors d'un clic droit sur celle-ci. Ensuite, je fais un test sur l'&#233;l&#233;ment s&#233;lectionn&#233; lors du click droit sur la souris afin de n'afficher le menu contextuel que lorsqu'un &#233;l&#233;ment est s&#233;lectionn&#233;.
Mon probl&#232;me est le suivant :
Au d&#233;marrage de mon appli, ListView1.FocusedItem.Text
 n'est pas vide mais il contient l'&#233;l&#233;ment de la 1&#232;re ligne de ma listview. Et ce meme si rien n'est s&#233;lectionn&#233;. Donc en faisant un clic droit sur une ligne non ajout&#233;e de ma listview, mon menu contextuel s'affiche et je ne veux pas.
Quelqu'un a-t-il une solution ???

Ah oui, je d&#233;veloppe en VB .NET.

Hebus1976 · Answer

C'est bon j'ai trouv&#233; la solution. Il suffit de faire un test sur selected et non sur focus.
Voici mon code si ca peut aider quelqu'un :


Private 
Sub ListView1_MouseUp(
ByVal sender 
As 
Object, 
ByVal e 
As System.Windows.Forms.MouseEventArgs) 
Handles ListView1.MouseUp



Dim j 
As 
Integer
Dim FlagSelect 
As 
Boolean = 
False



If (e.Button = MouseButtons.Right
) 
Then
    For j = 0 
To (Me.ListView1.Items.Count() 
- 1) Step 1
        FlagSelect = 
Me.ListView1.Items(j).Selected()
        
If (FlagSelect = 
True) 
Then
            Exit 
For
        End 
If
    Next j
    If (FlagSelect = 
False) 
Then 
        Me.MenuItem1.Visible = 
False
        Me.MenuItem2.Visible = 
False
    Else
        Me.MenuItem1.Visible = 
True
        Me.MenuItem2.Visible = 
True
    End 
If
End 
If
End 
Sub

Menu Contextuel dans une Listview en VB .NET

1 réponse

Discussions similaires