[bothy]

El error se encontraba en la declaracion de la variable UnEdit : Tcomponent;

Código Delphi [-]
 var i:integer;
  cEdit : String;
  UnEdit :   Tcomponent;

begin
 for i:=1 to 6 do
  begin
    cEdit :='Edit'+IntToStr(i);
    UnEdit :=  Findcomponent(cEdit);

    if Assigned(UnEdit) then
      TEdit(UnEdit).Text  := '';
  end;
end;

gracias casimiro me acabas de ayudar con 100 edit1.clear