Efectuar una determinada operación sobre todos los componentes de un formulario (Delphi)
ComponentCount devuelve el número total de componentes y Component es la matriz que los contiene.
Por ejemplo, si queremos asignar un valor a la propiedad que se nos ocurra, por ejemplo dejar todos los componentes Edit de un formulario en blanco:
Código Delphi
[-]
For x := 0 To ComponentCount - 1 Do
If Components[x] Is TEdit Then
TEdit(Components[x]).Text := '';
Hay que recordar que la matriz se inicia en el elemento 0, por eso el bucle con el número de componentes menos 1.