Bucle for

[jafera]

Buenas de nuevo a todos.

Tengo un pequeño problema de interpretacion del bucle for, el cual no acaba de funcionar como yo quiero.
Este es el bucle:

Código Delphi [-]
v1:=2;
z1:=2;
while not Inscripcio.Eof do
begin
  for v := 1 to v1 do
  begin
    F_ModulDades.Punts_Zona.Open;
    F_ModulDades.Punts_Zona.Append;
    F_ModulDades.Punts_ZonaID_CURSA.Value:=InscripcioCURSA.Value;
    F_ModulDades.Punts_ZonaDATA.Value:=F_ModulDades.CursaDATA_CURSA.Value;
    F_ModulDades.Punts_ZonaDORSAL.Value:=InscripcioDORSAL.Value;
    F_ModulDades.Punts_ZonaVOLTA.Value:=v;
    for z := 1 to z1 do
    begin
      F_ModulDades.Punts_ZonaZONA.Value:=z;
      F_ModulDades.Punts_ZonaPUNTS.Value:=0;
    end;
    F_ModulDades.Punts_Zona.Post;
  end;
  Inscripcio.Next;
end;

Lo que necesito es poder recorrer el bucle para que me arroje un resultado así:

1,1, 1/1/13, 1,1,1,0;
2,1, 1/1/13, 1,1,2,0;
3,1, 1/1/13, 1,2,1,0;
4,1, 1/1/13, 1,2,2,0;

y asi hasta recorrer toda la consulta Inscripcio, pero lo único que consigo es que me guarde solamente la ultima pasada por la variable z, es decir que obtengo lo siguiente:

1,1, 1/1/13, 1,1,2,0;
2,1, 1/1/13, 1,2,2,0;

El primer numero es un AUTOI.
El cambio devuelta lo realiza bien pero el de zona no, no se si me falta poner un next o hacer el proceso de otra forma.

Gracias por adelantado.

Uf creo que ya he superado el 400 (mensaje) crei que no llegaria a ello, jejeje
Hay premio?.
Bueno os invito yo, vale.....