Kann es sein Das Du da zweimal den key abfragst wenn er gedrückt ist?
Delphi-Quellcode:
....
if FDistance <= 0 then
begin
if ((RRichtung = Links) and (GetAsyncKeyState(65) <> 0) or // A //<----
(RRichtung = Rechts) and (GetAsyncKeyState(68)<> 0 ) or // D
(RRichtung = Hoch) and (GetAsyncKeyState(87)<> 0) or // W
(RRichtung = Runter) and (GetAsyncKeyState(83)<> 0)) then // S
begin
FDistance := 5;
end
else
FMoving := false;
end;
Gruss alfold