Discussion :

[riemp]

Bonjour,

Je cherche quel evenement d'une listview permettrait lorsqu'on clique sur la listview dans une cellule (sur un subitems) de renvoyer le texte du subitem cliqué. Le code du renvoi n'est pas un problème. Par contre si on clique sur une autre case que celles de la colonne(0) (ou de la ligne (0)), rien ne se produit.

Autrement dit, si je veux le texte de la cellule (n,m), au lieu de cliquer simplement sur cette cellule et renvoyer Listview.item(n).subitms(m).text , il faut que je clique sur la cellule (0,m) pour obtenir le n° de la colonne (m: le subitem), puis que je clique sur la cellule (n,0) pour obtenir le n° d'item (n) et là c'est pas tres ergonomique.

QQun a une idee ?

Merci

[wallace1]

Grace au gestionnaire d'évènement "ItemSelectionChanged" de ton Listview :

Code :

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

1
2
3
4
5
6
 
 Public Sub ListView1_ItemSelectionChanged(ByVal sender As Object, ByVal e As System.Windows.Forms.ListViewItemSelectionChangedEventArgs) Handles ListView1.ItemSelectionChanged
        If e.IsSelected Then
            msgbox(e.item.subitems(1).text)
        End If
    End Sub

A+

[riemp]

Merci de ton aide, néanmoins qd tu clique sur la listview ailleurs que colonne (0)
la procedure ne declenche pas l'evenement itemselectionchanged...
++

[wallace1]

Merci de ton aide, néanmoins qd tu clique sur la listview ailleurs que colonne (0)
la procedure ne declenche pas l'evenement itemselectionchanged...
++

Parce que tu n'as certainement pas paramétré ton contrôle Listview correctement :

Code :

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

ListView1.FullRowSelect = True

EDIT : Dans la fenêtre des propriétés de ton contrôle ListView (en mode concepteur de vue) :

[riemp]

Whaa, evidement cela marche bien mieux forcement!!!!!!!!!!!!!!!

Merci beaucoup, j'y avais passé des heures à essayer tous les événements, recherche dans cours,FAQ, forum,google avant de mettre cette discussion, pourquoi tu ne me l'as pas dit plus tot! ( lol bien sur )

merci encore

[riemp]

Je pensais savoir comment retourner le numéro de la colonne
dans laquelle le click se fait, mais seul l'item (en fait 'row' ) et retourné,
avec un code du style listview.selecteditem.column
Mais j'y arrive Pas

Can u help wallace1

Merci

[wallace1]

Partons du principe que tu as 3 colonnes dans ton Listview1 :

Selon l'énoncé de ton problème :

- Lors d'1 click sur l'item dans le Listview1 = Gestionnaire d'évènement : ListView1.MouseClick

- Dans ce gestionnaire d'évènement tu utilises l'argument MouseEventArgs (e) afin de récupérer les coordonnées X Y du curseur de souris lors du click.

- Tu travailles uniquement avec l'axe X (horizontalement) car le point du curseur de souris se situe dans des colonnes (verticales).

- Pour savoir si ce click sur l'axe X est compris dans la plage des coordonnées d'une colonne ( < compris entre >) alors tu utilises la valeur de chaque largeur des colonnes =

Si X supérieur à 0 et X inférieur à largeur colonne 1 alors afficher nom colonne 1

Si X supérieur à largeur colonne 1 et X inférieur à (largeur colonne 1 + largeur colonne 2) alors afficher nom colonne 2
...etc.....

Sachant que :
- largeur colonne 1 = ColumnHeader1.Width
- largeur colonne 2 = ColumnHeader2.Width



-------> Voilà le code qui résume l'explication :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
 
 
    Public Sub ListView1_MouseClick(ByVal sender As Object, ByVal e As MouseEventArgs) Handles ListView1.MouseClick
        If (e.Location.X > 0 And e.Location.X < ColumnHeader1.Width) Then
            MsgBox(ColumnHeader1.Text)
        ElseIf (e.Location.X > ColumnHeader1.Width And e.Location.X < ColumnHeader1.Width + ColumnHeader2.Width) Then
            MsgBox(ColumnHeader2.Text)
        ElseIf (e.Location.X > ColumnHeader1.Width + ColumnHeader2.Width And e.Location.X < ColumnHeader1.Width + ColumnHeader2.Width + ColumnHeader3.Width) Then
            MsgBox(ColumnHeader3.Text)
        End If
    End Sub

A+

[chrismonoye]

Bonjour,
en complément des propositions de wallace1, "la méthode HitTest fournit des informations d'élément, à des coordonnées x et y données." (Dixit MSDN).
A tester sur un événement exposant le paramètre "MouseEventArgs", comme vu sur le Net :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
    Private Sub ListView1_MouseUp(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles ListView1.MouseUp
 
        Dim info As ListViewHitTestInfo = ListView1.HitTest(e.X, e.Y)
        Dim lvi As ListViewItem = info.Item
        Dim lvis As ListViewItem.ListViewSubItem = info.SubItem
 
        If Not lvis Is Nothing Then
            If Not lvi Is Nothing Then
                MessageBox.Show("Nom de l'Item ou du SubItem cliqué ; " & lvis.Text & ";  Column : " & lvi.SubItems.IndexOf(lvis).ToString)
            End If
        End If
 
    End Sub

[wallace1]

Effectivement Chrismonoye ta proposition est plus propre.

Donc riemp si tu veux récupérer le nom de la colonne de l'item cliqué alors il te faudra modifier cela dans le gestionnaire proposé par Chrismonoye :

Code :

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

MessageBox.Show("Nom de l'Item ou du SubItem cliqué ; " & lvis.Text & ";  Column : " & ListView1.Columns(lvi.SubItems.IndexOf(lvis)).ToString)

[riemp]

Merci guys,

heureusement que vous avez accepté de m'aider, je n'y serais jamais arrivé tout seul, la solution de chrismonoye (tahitien chris?) me va bien: le contenu de la cellule + le numero de colonne, c'est super. Merci beaucoup aussi à toi wallace1 pour ton perfectionnisme.

Comment connaissez vous les types de variable qui sont ici déclarées comme:

dim info as ListViewHitTestinfo

il y a t-il un breviaire qui decrit tout ça avec les explications? MSDN? cours ? tuto?

Je laisse 'non resolu' pdt qques instants si vous pouvez repondre à ma derniere quest.

[riemp]

C'est qd mm bizarre que Bill n'ait pas prévu ça comme propriete. M'enfin

[MABROUKI]

bonjour riemp

Le plus simple toujours .....est de prendre le temps de lire MSDN Doc...

C'est HitTest qui le fait...avec MouseDown.
code:

Code :

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

1
2
3
4
5
6
7
 
  Private Sub ListView1_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles ListView1.MouseDown
        Dim info As ListViewHitTestInfo = ListView1.HitTest(e.X, e.Y)
        MessageBox.Show(info.Location.ToString())
        MessageBox.Show(info.SubItem.Text)
 
    End Sub

bon code....

[riemp]

Merci à tous