Hallo,
das mit den TImer funktioniert nicht da die geschwindigkeit der Figur von den Hintergrundrocessen abhängig ist.
Diese Methode:
Delphi-Quellcode:
procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
begin
if(GetAsyncKeyState(VK_RIGHT) <> 0) then
Button1.Left := Button1.Left + 1;
if(GetAsyncKeyState(VK_SPACE) <> 0) then
Button1.Caption := IntToStr(StrToIntDef(Button1.Caption, 0)+1);
end;
funktioniert auch nicht ganz so wie ich mir das vorstelle. Ich kann zwar in 2 richtungen gleichzeitgi fahren aber wenn ich z.b die linkpfeiltaste gedrück halte und einmal die Leertaste drücke und wieder loslasse dann bewegt sich das schiff nicht mehr, obwohl ich ja noch die linke pfeiltaste gedrückt halte.
Kann mir da wer weiter helfen?
mfg,
Ferby