Jump"n"run

[DGL-luke]

da würde ich dir jetzt fast dazu raten, alle x millisekunden den tastaturstatus mit getasynckeystate abzufragen und dann eben, wenn mehrere tasten gedrückt sind, auch die entsprechenden aktionen auslösen.

Natürlich kannst du auch im OnKeyDown Variablen setzen und im OnkeyUP wieder entsetzen

Delphi-Quellcode:

//global:
type TKeys = (left,right,up,down); //das hier ist ein aufzählungstyp

var keysdown = set of TKeys; //das hier ist eine Menge

procedure TForm1.OnkeyDown(Sender: TObject, var Key: Integer);
begin
case Key of
  vk_left: keysdown = keysdown + left; // hier fügst du der menge eine wert hinzu
  //etc.
end;
// dasselbe für onkeyup, nur dann mit -

Das ganze musst du dann natürlich im Timer-Event auswerten.

EDIT: ach ja übrigens, ich hab jetzt glaub ich schon 6 threads von dir gesehen, und in zwei geantwortet... meinst du nicht, das reicht jetzt dann mal wieder ? im übrigen kann ich dir empfehlen, da du in Delphi neu scheinst, die mal die Tutorial auf www.dsdt.info durchzulesen und eventuell, wenn es dir ernster ist, dir ein Buch zu kaufen oder erstmal in einer Bücherei auszuleihen (solls ja auch geben).