Discussion :

[Le Maraud]

Bonjour tout le monde

Petite question, je sèche dessus depuis pas mal de temps

J'ai créé une liste des panels que j'ai dans mon formulaire

Code :

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

1
2
 
Dim lstPanelsPrestations As New List(Of Panel) From {pnlAccessibilite, pnlActivites}

j'ai abrégé à 2

et je voudrais, au lieu de pnlActivites, tapoter lstPanelsPrestations.item(2) pour ainsi automatiser certaines taches
par exemple

Code :

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

1
2
 
lstPanelsPrestations.Item(3).Enabled = False

Mais lorsque je fais ça, j'ai la belle erreur System.NullReferenceException*: 'La référence d'objet n'est pas définie à une instance d'un objet.'

Que ne fais je donc pas bien ?

Merci

[Delaney]

Salut,
J'ai testé. Le principe fonctionne.

Code :

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

1
2
3
4
5
6
Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click
        Dim list_panel As New List(Of Panel) From {Panel1, Panel2}
        list_panel.Item(1).Visible = True
        list_panel.Item(1).Enabled = True
 
    End Sub

Où as tu mis ton dim et où fais tu tes appels ? c'est peut être un problème de déclaration de variable local qu'il ne retrouve pas .

Dans ce cas place ta déclaration de list dans un module

Code :

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

1
2
3
Module Module1
    Public list_panel As New List(Of Panel) From {Form1.Panel1, Form1.Panel2}
End Module

[Le Maraud]

Salut Elthorn

Ah, effectivement, en le plaçant dans le load, ça à l'air de fonctionner

Je l'avais placé dans la déclaration des variables globales du formulaires et je l'appelais dans le load

Code :

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

1
2
3
4
5
6
 
    Dim lstPanelsPrestations As New List(Of Panel) From {pnlAccessibilite, pnlActivites, pnlConforts, pnlEncadrements, pnlEquipements, pnlServices}
 
    Private Sub Form1_Load(sender As Object, e As EventArgs) Handles Me.Load
 
        lstPanelsPrestations.Item(3).Enabled = False

Mais en le plaçant comme ceci, je n'ai plus l'erreur

Code :

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

1
2
3
4
5
 
    Private Sub Form1_Load(sender As Object, e As EventArgs) Handles Me.Load
 
        Dim lstPanelsPrestations As New List(Of Panel) From {pnlAccessibilite, pnlActivites, pnlConforts, pnlEncadrements, pnlEquipements, pnlServices}
        lstPanelsPrestations.Item(3).Enabled = False

J'vais creuser mais normalement, on est sur la bonne piste

Merci bien

[Sehnsucht]

Si tu l'initialises lors de la déclaration c'est un peu comme si tu l'avais mis en début de constructeur.
Par conséquent cela se fait avant l'appel à InitializeComponent qui défini les contrôles.
Donc avant InitializeComponent comme c'était initialement tes «variables panel» ont Nothing pour valeur d'où la NullReferenceException.

Petite note bonus pas spécialement indispensable, tu peux raccourcir uneListe.Item(index) en uneListe(index) directement

[Le Maraud]

Merci bien Sehnsucht pour cet éclaircissement et pour la pitite astuce d'écriture, tout se prend...

Bonne continuation à tous les 2