limpiar text en edit

[Bacterion]

lo primero que tienes que ver es ¿que estas haciendo con form1.edit+contador.text:=' ' ;?

Una forma de hacer lo que buscas es, saber que todo Tcomponent tiene una lista de components que posee. El Form es un Tcomponent y por lo tanto, todo componente que pegas en el está en esa lista. Se accede por medio de la propiedad Components. Hay otra que te da cuantos hay, componentCount.

Ejemplo:
Procedure TForm1.LimpiaEdits;
var
I: Integer;
begin
for i := 0 to ComponentCount -1 do
if Components[i] is TEdit then
TEdit(Components[i]).Text := '';
end;

Esto debe funcionarte, salvo fallos de sintaxis.