Fehler in meinem Snake-Programm

[himitsu]

[Delphi]-Tags könnten nicht schaden (kann man übrigens editieren)

Zitat:

StartX := rTeile[Index].X = 16;

Der Vergleich rTeile[Index].X = 16 erzeugt als Ergebnis einen Bollean
und du versuchst dann diesen Bollean an einen Integer zu übergeben, was natürlich nicht geht.
> also, das "=" (der Vergleich) darin ist Schuld


Achtung: In deiner Init-Methode hast du vergessen die Array-Indize hochzuzählen.


PS:

Zitat:

for Index :=0 to rAnzahlTeile do

rAnzahlTeile ist wohl etwas falsch benannt,
denn so wie du es nutzt entspricht es eher einem "letzter/höchster Index"

Vorschlag:
Entweder umbenennen und den Namen der Nutzung anpassen

oder die Nutzung dem Namen anpassen und dann for Index :=0 to rAnzahlTeile-1 do