[_Baga_]

Подскажите как 20 штук Edit программно поле очистить?

[lmikle]

Код:

var
  I : Integer;
begin
  For I := 0 To ComponentCount-1 Do
    If Components[i] Is TEdit Then
      (Components[i] As TEdit).Text := '';
end;

[_Baga_]

Спасибо lmikle