Morgen,
sollte es nicht
Zitat:
if key=37 then inc(x);
if key=38 then
dec(x);
if key=39 then inc(y);
if key=40 then
dec(y);
if key=#37 then inc(x); etc. heißen?
Eventuell keyPreview der Form auf true stellen.
Vielleicht mal mit step/trace durch den Code gehen und schauen ob
eine Deiner if anweisungen true wird.
Grüße
Klaus