Wie mehrere Edits auf Readonly setzen?

[himitsu]

Hat Lazarus auch einen Components-Enumerator an TComponent?

Delphi-Quellcode:

for C in Self do
  if C is TEdit then
    ...

PS: FindComponent ist für ein Control, dessen Namen man kennt. (gut, man könnte die Namen z.B. in einem Array/Liste speichern und Diese dann durch gehen)