TMainMenu auf TCard platzieren?

[PeterPanino]

Delphi 10.4.2 VCL Application: Leider scheint es keine Möglichkeit zu geben, ein MenuBar (z.B. TMainMenu) auf einem TCard zu platzieren, wenn man z.B. jedem Panel eines CardPanel ein eigenes Menü spendieren möchte.

Man könnte zwar ein TActionMainMenuBar erstellen. Aber das ist viel zu umständlich, da man dafür extra einen ActionManager und für diesen wiederum eine oder mehrere ActionLists erstellen muss. Viel einfacher wäre es, wenn man ganz einfach eine MenuBar auf einem Panel platzieren könnte.

Oder kennt jemand einen Workaround dafür?

[Uwe Raabe]

Nur so 'ne Idee: Auf jedem TCard ein eigenes TMainMenu platzieren und dieses beim Aktivieren der Card dem Form.MainMenu zuweisen.

[PeterPanino]

Zitat:

Zitat von Uwe Raabe (Beitrag 1491740)

Nur so 'ne Idee: Auf jedem TCard ein eigenes TMainMenu platzieren

Gute Idee. Leider kann man auf einem TCard kein TMainMenu platzieren.

[PeterPanino]

Leider hat Embarcadero dem VCL TMainMenu die unsinnige EINSCHRÄNKUNG mit gegeben, dass man TMainMenu nur auf einer TForm platzieren kann. Re-Parenting funktioniert leider auch nicht!

Oder anders ausgedrückt: In der VCL fehlt eine MENUBAR Komponente, die auf jedem Container-Control platziert werden kann!

[Uwe Raabe]

Zitat:

Zitat von PeterPanino (Beitrag 1491742)

Leider hat Embarcadero dem VCL TMainMenu die unsinnige EINSCHRÄNKUNG mit gegeben, dass man TMainMenu nur auf einer TForm platzieren kann.

Na ja, ein

Delphi-Quellcode:

TMainMenu

ist (obwohl am Ende was Sichtbares rauskommt) erstmal kein

Delphi-Quellcode:

TControl

, sondern eine Non-Visible Component und kann somit (genau wie ein

Delphi-Quellcode:

TPopupMenu

) auf einem

Delphi-Quellcode:

TForm

,

Delphi-Quellcode:

TFrame

oder

Delphi-Quellcode:

TDataModule

platziert werden. Man kann aber beliebig viele

Delphi-Quellcode:

TMainMenu

innerhalb eines solchen Containers platzieren und beim Wechsel der

Delphi-Quellcode:

TCard

dann das entsprechende dem MainMenu-Property des Forms zuweisen.

Insofern war meine Formulierung Auf jedem TCard ein eigenes TMainMenu platzieren vielleicht etwas missverständlich, sorry.

[PeterPanino]

Zitat:

Zitat von Uwe Raabe (Beitrag 1491743)

... Man kann aber beliebig viele

Delphi-Quellcode:

TMainMenu

innerhalb eines solchen Containers platzieren und beim Wechsel der

Delphi-Quellcode:

TCard

dann das entsprechende dem MainMenu-Property des Forms zuweisen.

Das wäre nur dann sinnvoll, wenn das MainMenu visuell direkt an das Container-Control angrenzt. Wenn aber das Container-Control visuell vom TMainMenu abgesetzt ist bzw. sich noch andere Controls zwischen dem MainMenu und dem Container-Control befinden, dann kann der Benutzer den logischen Zusammenhang zwischen dem MainMenu (das sich ja an der oberen Seite der TForm befindet) und dem Inhalt des Container-Controls, auf das sich das MainMenu bezieht, nicht herstellen. Denn der Sinn und Zweck einer MenuBar in einem Container-Control ist genau der, dass für den Benutzer ein visueller Zusammenhang zwischen dem Container-Menü und dem Inhalt des Container-Controls besteht.

[Uwe Raabe]

Zitat:

Zitat von PeterPanino (Beitrag 1491745)

Das wäre nur dann sinnvoll, wenn das MainMenu visuell direkt an das Container-Control angrenzt.

Dann bist du aber nicht auf der Suche nach einem TMainMenu, denn das ist kein Control, sondern ein Teil des Formulars - ähnlich wie der Titel oder der Fenster-Rahmen. Das TMainMenu wird ja (außer bei Verwendung von VCL-Styles) nicht von der VCL gezeichnet, sondern intern von Windows.

Außerdem geht ein TMainMenu nur für das Form und nicht für dessen Child-Controls: https://docs.microsoft.com/en-us/win...etmenu#remarks

Zitat:

A menu can be assigned to any window that is not a child window.

Zitat:

Zitat von PeterPanino (Beitrag 1491742)

Leider hat Embarcadero dem VCL TMainMenu die unsinnige EINSCHRÄNKUNG mit gegeben, dass man TMainMenu nur auf einer TForm platzieren kann.

Es handelt sich eben gerade nicht um eine Einschränkung seitens Embarcadero - das war ganz allein Microsoft!

[PeterPanino]

Schade, dass es

Delphi-Quellcode:

TMenuBar

nur in

Delphi-Quellcode:

FMX

gibt und nicht in der

Delphi-Quellcode:

VCL

:

https://i.imgur.com/ux6ocS1.png

[TiGü]

Ich verstehe das Argument mit dem Aufwand nicht.
Ich habe gerade in drei Minuten ein Cardpanel, zwei Cards mit jeweils einer ActionMainMenuBar und einem gemeinsamen ActionManager mit vier Actions zusammengeklickt.

Wo ist denn da der Aufwand?
Da hat es doch länger gedauert, den Eröffnungspost zu schreiben?! :glaskugel:

[PeterPanino]

Zitat:

Zitat von TiGü (Beitrag 1491758)

Ich verstehe das Argument mit dem Aufwand nicht.
Ich habe gerade in drei Minuten ein Cardpanel, zwei Cards mit jeweils einer ActionMainMenuBar und einem gemeinsamen ActionManager mit vier Actions zusammengeklickt.

Ob du's glaubst oder nicht - Programmieren besteht nun mal nicht nur aus "Zusammenklicken" ...

[TiGü]

Das ist deine Antwort? :roll:

[PeterPanino]

Ich verwende jetzt als

Delphi-Quellcode:

TMenuBar

-Ersatz eine

Delphi-Quellcode:

TRzToolbar

:

Anhang 54145

... bis Embarcadero ein

Delphi-Quellcode:

TMenuBar

Control für die VCL herausbringt :]

[bernau]

Zitat:

Zitat von TiGü (Beitrag 1491763)

Das ist deine Antwort? :roll:

Wenn ich es richtig verstanden habe, möchte er das Menü nicht an der Standardposition des Forms haben, sondern an einer anderen stellen. Siehe dazu das Bild, welches er in einem Post verlinkt hat.

Das geht tatsächlich nicht einfach mit zusammenklicken.

[PeterPanino]

Wenn man das Verhältnis von erreichtem Ergebnis zum tatsächlichen Aufwand (inkl. Fehleranfälligkeit und unnötiger Komplexität sowie Verwaltungsaufwand) des Zusammenspiels von TActionMainMenuBar/ActionManager/ActionLists betrachtet, dann ist dieses Verhältnis bei manchen Projekten einfach nicht sinnvoll. Das heißt, in vielen Fällen wäre eine einfache (frei platzierbare) MENUBAR sinnvoller als eine TActionMainMenuBar.

[TiGü]

Zitat:

Zitat von bernau (Beitrag 1491788)

Das geht tatsächlich nicht einfach mit zusammenklicken.

Doch, ist ganz einfach.
Aber wenn man von vornherein sich einer bestimmten Lösung verweigert...

Anhang 54150

Anhang 54151