Ein Fehler in der Deklaration liegt nicht vor, aber gewöhn dir an in solchen Fällen mit 0 anzufangen.
So hab ich keinen Fehler gefunden, durch Debuggen sollte es recht einfach sein dahinter zu kommen.
PS: i := i + 1 ist 10% schneller als inc(i). Hab mir mal ein kleines Testprogramm dafür geschrieben um es zu testen