hier der fehler:
[DCC Warnung] Unit14.pas(404): W1019 FOR-Schleifenvariable muss eine einfache lokale Variable sein
Diesen Fehler erhältst du dann, wenn du in einer Procedure oder Function zum Zählen eine Variable verwendest, die außerhalb dieser Procedure oder Function deklariert wurde bzw. mit anderen Worten: die keine einfache lokale Variable ist.