Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Programmieren allgemein (https://www.delphipraxis.net/40-programmieren-allgemein/)
-   -   Tastendruck kombination abfragen (https://www.delphipraxis.net/179302-tastendruck-kombination-abfragen.html)

Luki206 25. Feb 2014 15:21

Tastendruck kombination abfragen
 
Hi,
ich habe schon eine gefühlte Ewigkeit gegoogled habe aber nichts passendes gefunden. Folgendes Problem, ich habe eine Software geschrieben die Bestellungen verwaltet, nur hat jetzt mein Vorgänger, der die Software gemacht hatte (meine ist von Grund auf neu falls Verwirrung entsteht), einen Pilzkopfknopf mit einem ich sage mal 'Tastatur-Modul' verknüpft und hat den Tastendruck auf ALT+P gelegt. Leider kann ich mit der ActionList leider keine ALT Kombis machen. Jetzt stellt sich nur bei mir die Frage, wie mache ich das mit dem "Buzzer"? So hat es nicht geklappt:
Delphi-Quellcode:
procedure TFrmHaupt.FormKeyDown(Sender: TObject; var Key: Word;
  Shift: TShiftState);
begin
 if (key=18) and (key=80) then begin
    BtnFertig1Click(nil);
 end;
end;
Und bei meiner Form steht KeyPreview auf true;
Danke
Luki :)

PS: um löten könnte ich es nicht, habe dazu zwei linke Hände :mrgreen:

Dalai 25. Feb 2014 15:30

AW: Tastendruck kombination abfragen
 
Schau dir mal den Typ TShiftState genauer an, den du in deiner Methode hast. Dort kommt auch ALT vor.

MfG Dalai

Jonas Shinaniganz 25. Feb 2014 15:33

AW: Tastendruck kombination abfragen
 
Brauchst du einen Systemweiten Hotkey oder willst du nur reagieren, falls deine Anwendung den Focus hat?

LG

Luki206 25. Feb 2014 15:36

AW: Tastendruck kombination abfragen
 
Super! Klappt. Vielen Dank ;)

Luki206 25. Feb 2014 15:37

AW: Tastendruck kombination abfragen
 
Oh sorry, das habe ich eben nicht gesehen bzw. ich habe die Seite nicht neu geladen... :oops:


Alle Zeitangaben in WEZ +1. Es ist jetzt 07:23 Uhr.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz