Snake - Ein Problem mit dynamischen Arrays

[MrMooed]

Ahhh *klick* Somit müsste ich also vor jeder Bewegung überprüfen lassen, ob in der aktuellen Richtung ein Block vorhanden ist -> falls nicht Leben abziehen/ Beenden. Habe hier ebenfalls auf nicht auf die Syntax geachtet, aber so in etwa würde es dann ausschauen:

Delphi-Quellcode:

möglich = True
case Richtung of
  vorwärts: if Array[i+1] > High(Array) then moeglich = False;
  unten   : if Array[i-1] < Low(Array) then moeglich = False;
  rechts  : if Array[i,b+1] > High(Array[i]) then moeglich = False;
  links   : if Array[i,b-1] < Low(Array[i]) then moeglich = False;
end;

Jenachdem ob 'moeglich' True ist bewegt sich dann die Schlange - oder eben nicht. Hätte mir das jetzt eigentlich länger vorgestellt aber wären nicht "schnellere" Versionen mit Try..Exept zu bevorzugen ? Man muss ja nicht immer das Rad neu erfinden