Hola Alfredo
Yo hago algo así, parecido, pero en TTabSheet.
Te pongo un ejemplo:
Código Delphi
[-]
procedure Limpiar;
var
I:Integer;
Control:TControl;
begin
for I := 0 to From1.ControlCount-1 do begin
Control:= PaginaActual.Controls[i];
if Control is TEdit then TEdit(Control).Text := '';
end;
end;
Simplemente nos recorremos el Form (en este caso) y cuando encontramos un TEdit (o lo que sea), lo "limpiamos"... ¡Ah! si necesitas saber el nombre: TControl(Control).Name
Espero que te sirva...
Salu2