Delphi - Modificar propiedades de varios objetos

Hola,
haber si me pueden ayudar con el siguiente problema..
Como hago para modificar varios objetos , mejor dicho las propiedades.
por ejemplo , tengo en un form varios Edit.
y los quiero borrar. (edit.clear)
hay alguna forma de no hacerlo uno por uno..
gracias! de ante mano!!
saludos!

Este código borra todos los Edits del Form

procedure TForm1.Button1Click(Sender: TObject);
var
i: integer;
begin
for i:=0 to ComponentCount-1 do
if Components[i] is TEdit then
TEdit(Components[i]).Clear;
end;