Das kommt davon, wie Delphi die Schleife im Maschinencode umsetzt:
Code:
MOV CX,0 ;Startwert
schleife:
NOP ;hier stehen die Befehle in der Schleife
INC CX
CMP CX,4 ;Schleifenvari mit Endwert vergleichen
JNE schleife ;solange ungleich einen weiteren Durchlauf beginnen
Das hat das Resultat, dass die Schleifenvari am Schluß Endwert+1 ist.