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).