AW: Menu funktionalität ohne MainMenu
Zitat:
|
AW: Menu funktionalität ohne MainMenu
Zitat:
Die Abfrage auf ActiveFormHandle erfolgt, weil ich im Hauptformular neben MDI-Fenstern auch noch normale Formulare habe, welche auch einen modalen Fokus haben können (das sind Einstellflächen als Alternative zu modalen Dialogen, aber eben innerhalb der Form). Dann sollen natürlich Shortcuts nicht ausgeführt werden können (daher dann Exit). Habe hier übrigens beim rüber kopieren aus meinem Source die Abfrage auf das Formhandle versehentlich hinter die IsShortCut-Abfrage kopiert, richtig muss es aber so lauten:
Delphi-Quellcode:
Jedenfalls funktioniert hier die Nutzung von Actions, Shortcuts (aus ActionList oder dem unsichtbaren Mainmenu), Tastaturabfragen für Form, MDI, integrierte Forms usw. wie gewünscht.
procedure THauptformular.ApplicationEvents1ShortCut(var Msg: TWMKey;
var Handled: Boolean); begin if Application.ActiveFormHandle <> self.handle then exit; handled := MainMenu1.IsShortCut(Msg); ... |
Alle Zeitangaben in WEZ +1. Es ist jetzt 20:33 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