une classe ChainesData en string

Bonsoir,

j'aimerai convertir une classe ChainesData en string. le but par rapport une list nom de de chaine dans combobox1, je voudrais afficher l'image et nom dans listview1.
voir image dans le forum : https://www.developpez.net/forums/d2...mage-listbox1/

voici mon code :

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12

imgList.Images.Add(ChargerImage((From c As ChainesData In Chaines Where c.LogoURL = ComboBox1.Text Select c).Distinct.ToArray)) <= erreur Dim lvi As New ListViewItem("", imgList.Images.Count - 1) lvi.ImageIndex = imgList.Images.Count - 1 lvi.SubItems.Add((From c As ChainesData In Chaines Where c.GroupTitle = ComboBox1.Text Select c).Distinct.ToArray) <= erreur ListView1.Items.Add(lvi)   Private Function ChargerImage(ByVal Liens As String) As Image Dim client As New WebClient() Using str As Stream = client.OpenRead(Liens) Return Image.FromStream(str) End Using End Function

---

message erreur : Erreur Impossible de convertir une valeur de type 'Tableau à 1 dimension(s) de Player2_M3U.ChainesData' en 'String'.

je suis coincé pour convertir c.GroupTitle = ComboBox1.Text et c.LogoURL = ComboBox1.Text en string. avez-vous une autre solution pour pour convertir en string? merci d'avance

Bonjour,

Tu fais un ToArray, donc forcément en sortie t'as pas une string, puisque tu as un array de ChainesData.

Soit tu écrit un convertisseur pour transformer un array de chainesdata en string, soit tu récupères que la première ligne du array que tu convertis en string (en supposant que tu as déjà un convertisseur de ChainesData en string)

Bonjour,

Le plus simple est à mon avis d'utiliser un truc du genre :

Code:

---

Dim ChaineEnSortie As String = String.Join("CaractereDeSeparation", array)

---

Où CaractereDeSeparation est le caractère que tu veux mettre entre les différents éléments, une virgule, un point, rien, ce que tu veux...

Bonjour,

le code fonctionne avec string.join. je vous remercie pour cette avancement. avez-vous plus simple le maitre chaque nom sur une ligne a la fois? merci d'avance

Code:

---

1 2 3 4

Private Function ListChaines2(name As String) As String Dim ListName As IEnumerable(Of Object) = (From c As ChainesData In Chaines Where c.GroupTitle = name Select c).Distinct.ToArray Return String.Join(" ", ListName) End Function

---

voici en image :
Pièce jointe 632762

Pas certain que çà fonctionne dans ton interface, mais tu peux essayer de mettre un chr(10) comme séparateur au lieu du blanc.

Bonsoir,

j'ai refaire mon code pour lire par rapport le nom dans combobox1. mais j'arrive toujours pas à lister le nom par rapport au nom dans combobox1.

Code:

---

1 2 3 4 5 6 7

Private Function ListChaines(Name As String) As String Dim str As New List(Of String) For Each a As ChainesData In Chaines str.AddRange(a.GroupTitle.Where(Function(c) c.Equals(Name)).Distinct.ToArray) <= erreur Next Return str(str.Count - 1) End Function

---

avec addrange, j'ai un message d'erreur : Impossible d'effectuer un cast d'un objet de type 'System.Char[]' en type 'System.Collections.Generic.IEnumerable`1[System.String]'.

avec add ; rien ce passe dans listview1.

avez-vous une autre solution pour corriger cette erreur? merci d'avance

A priori ta requête ne retournera qu'un seul nom (tu ne récupères qu'un seul (distinct) nom de groupe à chaque fois, donc le ToArray me semble inutile.