Bewegungen in Welten

[XXcD]

Sorry hat mir keiner richtig beigebracht :cry: :cry:

Aber ist denn sonst alles in Ordnung?? Und mit Keydown das lass ich jetzt einfach so funktioniert ja :-D

[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

[Luckie]

Zitat:

Zitat von XXcD

Aber ist denn sonst alles in Ordnung?? Und mit Keydown das lass ich jetzt einfach so funktioniert ja :-D

Ich finde es nur unnötig kompliziert und warum das System mit einer globalen API-Funktion belasten, wenn es gar nicht nötig ist?