oder notfalls in Form.OnKeyDown die Tasten merken und in Form.OnKeyUp wieder vergessen.
Delphi-Quellcode:
Var TasteA, TasteB: Boolean;
Procedure TForm1.FormKeyDown(Sender: TObject; Var Key: Word; Shift: TShiftState);
Begin
If Key = 'a' Then TasteA := True;
If Key = 'b' Then TasteB := True;
End;
Procedure TForm1.FormKeyUp(Sender: TObject; var Key: Word; Shift: TShiftState);
Begin
If Key = 'a' Then TasteA := False;
If Key = 'b' Then TasteB := False;
End;
...
If TasteA Then {was machen, wenn Taste A gedrückt ist}