schau dir einemal die "Wormhunter" Demo an, die wird bestimmt helfen.
kann es sein das du das vergessen hast??
Delphi-Quellcode:
if (Key=VK_LEFT) then
begin
XMove:=-150;
Figur.AnimStart:=3;
Figur.AnimStop:=4;
mundungx:=Figur.X; //+19 ???
mundungy:=Figur.Y+20;