Menu funktionalität ohne MainMenu

[Dalai]

TActionList?

MfG Dalai

[Harry Stahl]

Ich verwende hier ein TApplicationEvent-Object in der Mainform. Mit der folgenden Abfrage kann ich die Shortcuts aus dem Main-Manu verwenden und die Alt+Buchstabe-Abfrage machen, um z.B. den entsprechenden Menübandeintrag (Alt+S für "Start") anzeigen zu lassen. Gleichzeitig wird sichergestellt, dass bestimmte Alt (+Strg)-Kombinationen von den üblichen Objekten (z.T. TEdit für "@-Zeichen", das man normalerweise mit Alt+Strg+E aufruft) verarbeitet werden können.

Delphi-Quellcode:

procedure Tfrm_Main.AppEvents1ShortCut(var Msg: TWMKey; var Handled: Boolean);
begin
  //Shortcut für mein nicht angezeigtes MainMenu?
  Handled := Menu1.IsShortCut(Msg);

  //Shortcut bzw. Key kam nicht aus dieser Form, daher hier keine weitere Prüfung
  //und statt dessen Verarbeitung in anderer Form (z.B. MDI)
  if Application.ActiveFormHandle <> self.handle then exit;

  if not handled then begin
    // Alt+Strg gedrückt?
    if (Getkeystate (VK_MENU) shr 15 <> 0) and (Getkeystate (VK_Control) <> 0) then begin
      if (msg.CharCode in [69,81]) then begin  // @ und €-Zeichen wurden gedrückt
        Handled := false;
        exit;
      end;
    end;
  end;

  if not handled then begin
    // Tasten Alt+Buchstaben (A-Z) gedrückt?
    if Getkeystate (VK_MENU) shr 15 <> 0 then begin
      if (msg.CharCode in [65..90]) or (msg.CharCode.ToString = '186') then begin
        handled := True;
        sleep (10);
        // Tatsächliche Verarbeitung in der Form-KeyUp-Prozedur
        FormKeyup(NIL, msg.CharCode, [ssAlt]);
      end;
    end;
  end;
end;

Beispiel für eine Anwendung im anliegenden Screenshot: Mainmenu ist in Form, wird aber nicht angezeigt (Stattdessen arbeite ich mit eigenen Menübändern, nutze aber die Menüeinstellungen des Mainmenus, für die der User auch benutzerdefinierte Einstellungen vornehmen kann, um so z.B. eigene Shortcuts festzulegen).

[Popov]

In jedem Buch alla "Wie diskutiere ich richtig" steht gleich am Anfang der Tipp: vereinbaren sie zuerst ein gemeinsames Glossar, so dass die Wörter für beide das gleiche bedeuten. Sonst reden sie evtl. aneignender vorbei.

Was meinst du mit "Menu funktionalität ohne MainMenu". Du hast kein Menü oder willst du nicht ein Menü aufklappen?

[Dejan Vu]

Komisch, die anderen drei (Dalai, Harry und ich) haben die Frage verstanden. Vielleicht liegts doch an Dir?

[Popov]

@Dejan Vu

Und jetzt?

[Dejan Vu]

Und jetzt könntest Du deinen Beitrag überdenken. Ne wahr?

[Daniel]

Alternativ könnte man auch einfach zum Thema zurück kommen.

[Captnemo]

Zitat von Popov:

Was meinst du mit "Menu funktionalität ohne MainMenu". Du hast kein Menü oder willst du nicht ein Menü aufklappen?

Der Maverik möchte die Tastaturfunktionalität, die in einem Mainmenu gegeben ist, ohne Mainmenu auf in seinem Programm nutzen.
So hab ich es jedenfalls verstanden.

[Perlsau]

Zitat von Captnemo:

Der Maverik möchte die Tastaturfunktionalität, die in einem Mainmenu gegeben ist, ohne Mainmenu auf in seinem Programm nutzen.

Wird diese Tastaturfunktionalität nicht bereits durch die Verwendung einer TActionList zur Verfügung gestellt? Also wenn ich eine ActionList in meiner Form platziere, dort Aktionen eintrage, selbige mit entsprechenden Hotkeys versehe und die Ereignisbehandlungen dazu schreibe, brauche ich nicht zwangsläufig ein MainMenu, um die Ereignisse auszulösen. Das MainMenu würde hier lediglich der visuellen Darstellung der Menüpunkte dienen, die Mavarick ja explizit nicht wünscht.

@Mavarick: Was meinst du dazu?

[Mavarik]

Zitat von Perlsau:

Zitat von Captnemo:

Der Maverik möchte die Tastaturfunktionalität, die in einem Mainmenu gegeben ist, ohne Mainmenu auf in seinem Programm nutzen.

Wird diese Tastaturfunktionalität nicht bereits durch die Verwendung einer TActionList zur Verfügung gestellt? Also wenn ich eine ActionList in meiner Form platziere, dort Aktionen eintrage, selbige mit entsprechenden Hotkeys versehe und die Ereignisbehandlungen dazu schreibe, brauche ich nicht zwangsläufig ein MainMenu, um die Ereignisse auszulösen. Das MainMenu würde hier lediglich der visuellen Darstellung der Menüpunkte dienen, die Mavarick ja explizit nicht wünscht.

@Mavarick: Was meinst du dazu?

Hmm gute Frage muss ich testen..

Was ist ein ein Child Fenster einen La&bel mit Focus Control auf ein TEdit hat...
Kommt der Alt+B noch durch? Was fatal wäre! [Edit] Jo und so ist es auch...

Eine ActionList klaut alle Tasten...

@Union Aufwendig.. Muss ich mir auch näher anschauen...
[EDIT] Leider falsche Reigenfolge..
bzw.. Selbst wenn ein MDI-Child active ist aber die Taste "nicht gebrauchen" kann... Wird diese ja ans Menu weitergeleitet...