Fehler in Delphi Pointer-Datenbank!

[kiar]

Delphi-Quellcode:

Leer := ',';
For I := 1 to (13 - length(Neu^.Nachname)) do Leer := Leer + ' ';
lbxAusgabe.Items.Add(Neu^.Nachname + Leer + Neu^.Vorname);
end;

Delphi-Quellcode:

Leer := ',';
For I := 0 to (13 - length(Neu^.Nachname)-1) do 
   begin
     Leer := Leer + ' ';
     lbxAusgabe.Items.Add(Neu^.Nachname + Leer + Neu^.Vorname);
   end;
end;

index fängt immer mit null an

mann da fehlt ja noch ein begin