Bonjour,
Je pensais arriver facilement a mes fins, mais je bloque.
J'ai un tableau d'objets (20 TCheckbox) que je cree dynamiquement dans une boucle.
Apres plusieurs sélections sur ces objets, je laisse a l'utilisateur la possibilite de tout reinitialiser via un bouton
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9 ObjetChk:array[0..19] of TCheckBox; ObjetChk[i]:= TCheckBox.Create(FmainXI); with ObjetChk[i] do begin Parent := FmainXI; Name := 'chk_'+Section.Name; Caption := Section.Name+' / Masquer '; end;
Sauf que lorsque j'arrive sur la ligne ObjetChk[i].Checked:=false; j'ai un super message d'erreur
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5 for i:=0 to 19 do begin ObjetChk[i].Checked:=false; ObjetChk[i].Font.Color:=clblue; end;
Je ne comprend pas pourquoi j'ai ce message (mes objets existent bien !).EAccessViolation - violation d'acces a l'adresse ... dans le module ... Lecture adresse 000000
Merci a vous
Oncle Pete
Partager