Delphi-PRAXiS
Seite 2 von 2     12   

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Object-Pascal / Delphi-Language (https://www.delphipraxis.net/32-object-pascal-delphi-language/)
-   -   Delphi Tastendruck Ausgeben (https://www.delphipraxis.net/129253-tastendruck-ausgeben.html)

Hawkeye219 15. Feb 2009 21:35

Re: Tastendruck Ausgeben
 
Die Funktion ShortCut befindet sich in der Unit Menus. Mit dem eingestreuten Kommentar wollte ich dich darauf hinweisen, dass du die USES-Anweisung entsprechend erweitern musst. ShortCut baut aus dem Inhalt des Nachrichten-Records Msg ein Tastenkürzel zusammen, das anschließend in der Variablen Key abgelegt wird.

Wie hast du eigentlich festgestellt, dass das Programm "nichts tut"? Du konntest den Quelltext doch aufgrund der Fehlermeldung gar nicht übersetzen. Ist die Methode FormShortCut mit dem Ereignis OnShortCut des Formulars fMain verbunden?

Gruß Hawkeye

MaToBe 15. Feb 2009 21:43

Re: Tastendruck Ausgeben
 
Zitat:

Zitat von Hawkeye219
Wie hast du eigentlich festgestellt, dass das Programm "nichts tut"? Du konntest den Quelltext doch aufgrund der Fehlermeldung gar nicht übersetzen. Ist die Methode FormShortCut mit dem Ereignis OnShortCut des Formulars fMain verbunden?

Indem ich das
Delphi-Quellcode:
Key := {Menus.}ShortCut(Msg.CharCode, KeyDataToShiftState(Msg.KeyData));
einfach auskommentiert habe :D

nicht haun bitte =P

Jetzt läufts supper, danke schön =)


Alle Zeitangaben in WEZ +1. Es ist jetzt 17:36 Uhr.
Seite 2 von 2     12   

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