Código Delphi [-] for I:=0 to ControlCount-1 do begin //o hasta el número que quieras if (Controls[i] is TEdit) then TEdit(Controls[i]).Text:=''; end;
for I:=0 to ControlCount-1 do begin //o hasta el número que quieras if (Controls[i] is TEdit) then TEdit(Controls[i]).Text:=''; end;