selection dans listview

Bonjour,
J'ai 2 listview
La premiere va me chercher les fichiers d'un dossier et la seconde a la selection dans la listview1 affiche le contenu du fichier dans la listview2
la premiere selection est bonne mais pas la deuxieme, une idée
Message : System.ArgumentOutOfRangeException*: 'InvalidArgument=La valeur '0' n'est pas valide pour 'index'. Arg_ParamName_Name
ArgumentOutOfRange_ActualValue'

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16

Private Sub ltcommandebarre_SelectedIndexChanged(sender As Object, e As EventArgs) Handles ltcommandebarre.SelectedIndexChanged Dim commandebarre As String   listview2.Items.Clear()   commandebarre = listview1.SelectedItems(0).Text Dim varcheminapprobarre As String varcheminapprobarre = "c:\test\" & commandebarre       Dim lines() As String = File.ReadAllLines(varcheminapprobarre) listview2.Items.AddRange(lines)     End Sub

---

Comme cela est précisé dans la documentation, l'événement ListView.SelectedIndexChanged se produit lorsque la collection SelectedIndices est modifiée..

Extrait de la documentation :

Citation:

---

La SelectedIndices collection est modifiée chaque fois que la Selected propriété d’un est ListViewItem modifiée. La modification de propriété peut se produire par programme ou lorsque l’utilisateur sélectionne un élément ou efface la sélection d’un élément. Quand l’utilisateur sélectionne un élément sans appuyer sur CTRL pour effectuer une sélection multiple, le contrôle efface d’abord la sélection précédente.

---

Donc
Lorsque tu sélectionne un élément, il est ajouté à SelectedIndices et SelectedIndexChanged est déclenché.
Lorsque tu sélectionne un autre élément, SelectedIndices est effacé et SelectedIndexChanged est déclenché, puis cet autre élément est ajouté à SelectedIndices et SelectedIndexChanged est redéclenché.

Ton problème est là :

Code:

---

commandebarre = listview1.SelectedItems(0).Text

---

Lors de la seconde sélection, SelectedItems est d'abord vidée, cela déclenche l'événement et puisqu'il n'y rien à l'indice 0 (puisque SelectedItems est vidée), tu plantes.

Merci mais normalement au prochain déclenchement je remplis avec:
commandebarre = listview1.SelectedItems(0).Text
Est ce qu'il faudrait faire un truc comme ça ? Je ne vois pas trop comment faire.

Code:

---

1 2 3 4

If ltcommandebarre.SelectedItems.Count <> 0 Then ltcommandebarre.SelectedItems(0).SubItems(1)   end if

---

Je ne vois pas trop comment faire svp

Il faut vérifier si listview1.SelectedItems contient des items avant de lire celui à l'index 0.

Merci popo.
Sur ma premiere selection c'est bon c'est sur ma deuxieme selection.
listview1.SelectedItems il faut vider les items ? est ce le fait de selectionner un fichier et de le lire dans un listwiew lvcontenubarre ?

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48

Private Sub ltcommandebarre_SelectedIndexChanged(sender As Object, e As EventArgs) Handles ltcommandebarre.SelectedIndexChanged Dim commandebarre As String   commandebarre = ltcommandebarre.SelectedItems(0).Text   Dim varcheminapprobarre As String varcheminapprobarre = Form4.cheminapprobarre.Text & "\" & commandebarre   Dim finligne As String = ";;" Dim separateur As String = ";"   Try 'Au cas d'erreur If IO.File.Exists(varcheminapprobarre) Then 'Si le fichier existe   Dim LesDonnéesbarre As String = IO.File.ReadAllText(varcheminapprobarre) 'Lire toute les données Dim LesElementsbarre() As String = LesDonnéesbarre.Split(New String() {finligne}, StringSplitOptions.RemoveEmptyEntries) 'Séparer avec (;;)   For Each elementbarre As String In LesElementsbarre 'Pour chaque éléments dans LesElements()     If (elementbarre.Contains(separateur)) Then 'Si ça contient le séparateur (;)   Dim LesValeurs() As String = elementbarre.Split(New String() {separateur}, StringSplitOptions.None) 'Séparer avec (;)   Dim NouveauElement As New ListViewItem 'Nouveau élément a ajouter dans la ListView   For i As Integer = 0 To LesValeurs.Length - 1 'Pour chaque valeur dans LesValeurs() If i = 0 Then 'Si c'est la première valeur NouveauElement.Text = LesValeurs(i) 'Ajouter la valeur dans la première colonne. Else 'Si non l'ajouter dans les autres colonnes NouveauElement.SubItems.Add(LesValeurs(i)) 'Si i = 1 donc c'est la deuxième colonne etc End If Next lvcontenubarre.Items.Add(NouveauElement) 'Ajouter l'élément a la ListView       End If Next End If Catch ex As Exception MessageBox.Show(ex.Message, "Erreur") End Try       End Sub

---

Je t'ai cité la documentation.
Je t'ai expliqué ce que cela implique lorsque tu fais ta deuxième sélection (et donc la raison de ton plantage).
Je t'ai dis qu'il fallait tester si tu avais un item sélectionné avant d'essayer de le lire.

Puisque mes mots et ceux de Microsoft ne suffisent pas à te faire comprendre où est ton problème, le mieux est que tu en fasse l'expérience d'une autre manière.
Vire tout le code de cette méthode pour le remplacer par un log qui indique que tu es passé par la méthode (un simple messagebox fera l'affaire).

Code:

---

1 2 3

Private Sub ListView1_SelectedIndexChanged(sender As Object, e As EventArgs) Handles ListView1.SelectedIndexChanged MessageBox.Show("Coucou") End Sub

---

Ensuite refais tes deux sélections et dis-moi ce que tu constates.

Ah j'ai compris

Code:

---

1 2	If Me.ltcommandebarre.SelectedIndices.Count <> 0 Then index = Me.ltcommandebarre.SelectedIndices(0)

---

Merci POPO

J'aurais écrit ceci (par rapport à l'utilisation que tu en fais) mais oui, tu as effectivement compris.

Code:

---

1 2 3 4 5 6

If ltcommandebarre.SelectedItems.Count <> 0 Then commandebarre = ltcommandebarre.SelectedItems(0).Text   Dim varcheminapprobarre As String .... End If

---

N'oublie pas le TAG Résolu.

Bonjour,
A toute fin utile, il existe egalement l événement : itemselectionChanged

++

L'utilisation de ItemselectionChanged ne change rien puisque le même phénomène se produit lors de la deuxième sélection.

Citation:

---

Envoyé par popo

L'utilisation de ItemselectionChanged ne change rien puisque le même phénomène se produit lors de la deuxième sélection.

---

Navré popo je ne repondais pas au probleme mais je pensais surtout que OP pouvait utiliser cet evenement au lieu d ecrire des selecteditems(0) partout pour recuperer l element sélectionné ..etc....etc.....