Discussion :

[BuzzLeclaire]

Bonsoir,

J'arrive pas bien à capter la différence entre

Code :

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

1
2
3
4
5
6
7
  With xxx do
  begin
          For n := ControlCount-1 downto 0 do
          Begin
             Controls[n].Free;
          end;
  end;

Code :

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

1
2
3
4
5
6
7
  With xxx do
  begin
          For n := ComponentCount-1 downto 0 do
          begin
            Components[n].Free;
          end;
  end

;

Quelqu'un peut-il m'expliquer la différence ?

A quelle moment faire le bon choix ?

Oui, Oui j'ai lu l'aide...

[Caribensila]

ControlCount : Renvoie le nombre de TControl (visibles) dont le demandeur est le Parent, donc est responsable de leur affichage.
ComponentCount: Renvoie le nombre de TControl (visibles) OU de TComponent (invisibles et orphelins) dont le demandeur est l'Owner, donc est responsable de leur libération.

En principe, quand il s'agit de libérer, tu utiliseras plutôt ComponentCount, et quand il s'agit de montrer ou cacher, tu utiliseras plutôt ControlCount.

Mais pour les compos créés dynamiquement il faut être particulièrement prudent parce que, par exemple, un TButton peut être enfant de la fiche et avoir pour Owner n'importe quel autre TComponent; un TPanel, par exemple.
Bref c'est comme dans la vie; il y a des Brutus et des Cosette qui peuvent faire l'histoire des bugs...