Necesito ayuda para un programa que usa FOR

[madrid_cr7]

Bueno primero explicar en que consiste:

Necesito:
1- Un edit escribir un numero de fraccionamientos
2- en otro edit poner el numero de terrenos que hay dentro del fraccionamiento.
3- en un edit poner largo y en otro edir el ancho
4- en otro edit que aparesca el area del terreno
5- que se repitan los pasos del 3 y 4 el numero de veces que hay terrenos y se sumen las areas de cada terreno para saber el area del fraccionamiento
6 que se repita del paso 2 al 5 y se sumen las areas de los fraccionamientos y me diga el total

Necesito que sea con for, que cada vez que me diga el area se borre del edit lo que aparesca en los edits del largo y ancho y que cada vez que se completen el numero de terrenos que se borren lo que aparesca en los edits del largo ancho y el del area y que cada vez que se complete un fraccionamiento se borren los edits de largo ancho area y terrenos.

para escribir los nuevos datos yo hice lo siguiente:

Código Delphi [-]
begin
c:=0;
d:=0;
for a:= 1 to strtoint(edit1.text) do
begin
for b:= 1 to strtoint(edit2.text) do
begin
edit5.text:=inttostr(strtoint(edit3.text)*strtoint(edit4.text));
c:= c + strtoint(edit5.text);
end;
edit6.Text:= inttostr(c);
d:=strtoint(edit6.text) + c;
end;
edit7.Text:=inttostr (d);

end;

pero esta mal lo que no entiendo como hacer es que me pida de nuevo los datos para los nuevos terrenos y fraccionamientos espero y me entiendan