Operacion sobre todos los componente de un formulario

[Goyo]

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.