for i:=0 to form1.ComponentCount-1 do
if (form1.Components[i] is TEdit) then
begin
//...whatever you want
end;