Liste "générique" list(Of )

Bonjour,
Pour faire des essais, je me suis crée un Form avec un DGV que je voudrais "générique", cad acceptant "un peu n'importe quoi", le tout en lecture seule.

J'ai donc commencé avec un list(Ofmaclasse)

dans le Form DGV generique

Code:

---

1 2	Public ListeGenerique As New List(Of maclasse) DGVgenerique.DataSource = ListeGenerique

---

je l'appelle depuis un autre Form par

Code:

---

1 2 3

Dim frm As New FormDGVgenerique frm.ListeGenerique = MaListeaAfficherdeTypeListOfmaclasse frm.ShowDialog()

---

cela marche bien pour mes besoins !
je voudrais maintenant pouvoir afficher d'autre types de list(of AutreClasse)
J'ai donc remplacé dans le FormDGVgenerique

Code:

---

Public ListeGenerique As New List(Of maclasse)

---

par

Code:

---

Public ListeGenerique As New List(Of object)

---

mais dans le Form appellant il y a maintenant une erreur car list(Of autreclasse) n'est pas une list(Of object)
J'ai essayé plusieurs cast trouvés sur le net, mais sans résultat

Quelle est la meilleure solution, sachant que le nbre de ligne et de colonne est limité (une dizaine env), qu'il ne s'agit que d'un affichage pour vérification en cours de développement (donc sans header,..), que les valeurs sont es string ou Integer

par avance, merci
Bertrand

soit mettre la propriété ListeGenerique as list(of object), soit faire une lui fournir des list(of ce qu'il attend), sachant que ca peut etre une classe abstraite ou une interface

Remplace

Code:

---

1 2	Public ListeGenerique As New List(Of maclasse) DGVgenerique.DataSource = ListeGenerique

---

Par

Code:

---

1 2	Public ListeGenerique As New List(Of Object) DGVgenerique.DataSource = CType(ListeGenerique, maclasse)

---

EDIT : Arf, grillé par Pol63

Le type List(Of T) n'est pas covariant, donc une List(Of QuelqueChose) n'est pas une List(Of Object). Inutile de faire un cast, ça ne passera pas.

A mon avis, le plus simple est de déclarer ListeGenerique comme étant de type Object, puisque de toute façon c'est le type de DataSource...

Bonjour Pol63
Merci pour cette réponse instantanée
J'ai pris la 1ère solution, en remplaçant ma liste(Of maclasse) par une list(Of object) et ça marche impec !
Cela semble tellement évident .... maintenant !
merci encore
Bertrand

Merci également à Ez3kiel et tomlev !!
(leur réponse est arrivée pendant que je répondais àPol63 )
Merci encore
Bertrand