ActionMainMenuBar + OnExecute wird nicht ausgeführt

[-=cats=-]

Hmm ....

Also das versteh ich leider noch nicht so ganz

Ich habe es so gemacht:

1. ActionMainMenuBar angelegt
2. ActionManager angelegt
3. Im ActionManager die Einträge für mein Menü gemacht und auf
mein MainMenu gezogen
4. In die Objekthierarchie auf den Menüeintrag gegangen
5. Dann auf Ereignisse
6. onExecute
7. Dort folgenden Code eingetragen:

Delphi-Quellcode:

 procedure TForm16.Action12Execute(Sender: TObject);
  begin
   ActionMainMenuBar1.Visible := false;
   LMDBackPanel2.Align := alTop;
   LMDBackPanel2.Visible := true;
   ShowMessage('Hallo');
  end;

Und jetzt dachte ich, wenn ich auf den Menüeintrag klicke, dann passiert was.
Nur leider passiert nichts