Alle TControl-Komponenten auf einem Form ansprechen

[Nikolas]

Hier bräuchte man eine Funktion wie findcomponent, mit der man aber auf alle TControls auf einem Form zugreifen kann. Hat da jemand eine Idee wie man sowas in einer Schleife aufrufen könnte um so mit einem einzigen procedure-Aufruf alle Controls verändern könnte? :gruebel:

THXbyTOX

[nailor]

Delphi-Quellcode:

form1.Components

[Nothine]

Delphi-Quellcode:

for I := 0 to Form1.ControlCount-1 do
  Verändere(Form1.Controls[I]);

[Nikolas]

Vielen Dank an euch beide! :thumb:

[nailor]

controls ist vielleicht noch besser. dann hat man schonmal ne vorauswahl

[Nikolas]

Die Lösung mit den Components hat auch den Nachteil, dass nicht sichtbare Komponenten angesprochen werden, die nicht über left, top... verfügen. Deswegen ist die Form.Controls perfekt.