Alle TEdit Felder leeren

[Meflin]

Delphi-Quellcode:

for i := 0 to ComponentCount - 1 do
    if Components[i] is TEdit then
        (Components[i] as TEdit).Text := '';