Como Elimina los Componentes de un Contenedor

[xander]

Empezado por delphi.com.ar

Se que es solo para fastidiar , pero también es bueno aclarar que el utilizar un for decreciente es un poquito mas "económico" que este código, ya que se consulta solo una vez en todo el ciclo la cantidad de ítems de la lista, por el contrario en este caso, se evalúa para cada iteración.

Pues eso no es del todo cierto... si lo implementas como se había mencionado antes:

Código Delphi [-]
  for i:=0 to ScrollBox1.ComponentCount -1 do ...

claro que se evalua en cada iteración... puedes probar poniendo alguna función en el for y llevando un log de las llamadas a la función y verás que en cada iteración del for se manda a evaluar la expresión de terminación.

Otra cosa sería si hicieras:

Código Delphi [-]
  C := ScrollBox1.ComponentCount -1;
  for i:=0 to C do ...

Entonces si solo se evalua una sola vez la cuenta de los componentes.

[roman]

La condición de terminación claro que se evalúa en cada ciclo, pero delphi.com.ar se refiere a la cantidad de items.

Si ponemos:

Código Delphi [-]
for I := ScrollBox.ControlCount -1 downto 0 do
  ScrollBox.Controls[i].Free;

se toma el valor de ScrollBox.ControlCount al comienzo del ciclo y nada más. De la forma que propone seoane:

Código Delphi [-]
while ScrollBox.ControlCount  > 0 do 
  ScrollBox.Components[0].free ;

el valor de ControlCount debe tomarse cada vez.

// Saludos