|
Registriert seit: 27. Nov 2017
2.490 Beiträge
Delphi 7 Professional
|
AW: Shift + NumPadX erkennen
31. Jul 2018, 18:39
Frage, was hast Du vor?
Um auf Tastendrücke zu reagieren setze ich KeyPreview des Forms auf True und fülle OnKeyUp mit Leben.
Da kann man Key (Word) (also z. B. die $81) und Shift (TShiftState) abfragen. Man bekommt beides als Parameter in die Ereignisroutine geliefert.
procedure TForm.FormKeyUp(Sender: TObject; var Key: Word; Shift: TShiftState);
Man kann dann in Shift abfragen, ob Strg, Alt oder Shift oder auch 'ne beliebige Kombination daraus betätigt wurde, in Key steht der nummerische Wert der Taste. Kann man dann mit VK_wieauchimmer vergleichen ...
Wäre das 'ne Alternative oder hast Du weiterreichende Anforderungen, die in dem Ereignis nicht umzusetzen sind?
|