Bewegungen in Welten

[CK_CK]

Wenn es funktioniert, dann wird's wohl in Ordnung sein
Das einzige ist, dass du den Code noch etwas aufräumen kannst. Z.B. so:

Delphi-Quellcode:

if Game.Active then
begin
   if (GetAsyncKeyState(Ord('W')) < 0) and (Image11.Top > 1) then Stepup;
   
   if (GetAsyncKeyState(Ord('A')) < 0) and (Image11.left > 1) then Stepleft;

   if (GetAsyncKeyState(Ord('S')) < 0) and (Image11.top < 350) then Stepdown;

   if (GetAsyncKeyState(Ord('D')) < 0) and (Image11.left < 350) then Stepright;
end;

Liebe Grüße,
Chris