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