Ich bleibe dabei, die Tastendrucke funktionieren noch nicht einmal. Ersetze das "bewegeSchlange" doch mal durch ein ShowMessage, allein das wird schon nicht kommen. Oder ich mache grade auch etwas gewaltig falsch:
Ich bekomme ohne weitere Hilfsmittel kein "onKeyDown" auf einer Form und das noch mit Pfeiltasten zum Laufen. Mit anderen Tasten wie Buchstaben allerdings schon.
Mein kleines Testprogramm (Formular + Image drauf) kommt in die OnKeyDown rein, wenn ich die Pfeiltasten nehm, daran liegts nicht. Es kann nur am Timer oder am Zeichnen liegen.