Discussion :

[Oncle_Pete]

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.

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;

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
 
 for i:=0 to 19 do begin
      ObjetChk[i].Checked:=false;
      ObjetChk[i].Font.Color:=clblue;
 end;

Sauf que lorsque j'arrive sur la ligne ObjetChk[i].Checked:=false; j'ai un super message d'erreur

EAccessViolation - violation d'acces a l'adresse ... dans le module ... Lecture adresse 000000

Je ne comprend pas pourquoi j'ai ce message (mes objets existent bien !).
Merci a vous

Oncle Pete

[Fabrice ROUXEL 1]

bonjour

si tu inverses les 2 instructions ça plante toujours sur la premiere?(ObjetChk[i].Font.Color:=clblue;
)

Le tableau est-il déclaré en local? (existe t'il encore au moment de l'accès...)

[Oncle_Pete]

Je suis sincerement desole car je viens de m'apercevoir d'une grosse erreur d'etourderie de ma part, a savoir, je commence ma creation d'objets depuis l'indice 1, tandis que ma boucle d'affectation commence a 0 (la honte).

Encore desole et surtout merci a toi Fabrice d'etre intervenu.

Oncle Pete