Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   GUI-Design mit VCL / FireMonkey / Common Controls (https://www.delphipraxis.net/18-gui-design-mit-vcl-firemonkey-common-controls/)
-   -   Delphi MainMenu.Merge für ein Menü auf einer Toolbar (https://www.delphipraxis.net/13986-mainmenu-merge-fuer-ein-menue-auf-einer-toolbar.html)

Generalissimo 30. Dez 2003 12:22


MainMenu.Merge für ein Menü auf einer Toolbar
 
Hallo,

ich habe ein Problem bezüglich der Merge-Prozedure für MDI-Anwendungen.
In meinem Hauptformular ist eine CoolBar. Auf einem CoolBand dieser Coolbar liegt
eine Toolbar, die wiederum in ihrer Eigenschaft Menu ein MainMenü (TMainMenu) hat.
Das selbe Spiel läuft in MDI-Childformularen ab.
Wenn jetzt ein MDI-Child erzeugt wird, wird das CoolBand des Childs in
die CoolBar des Hauptformular integriert.
Ebenso soll es mit dem MainMenu des Childs passieren

Bissl Code:

Delphi-Quellcode:
procedure TfrmMain.acChildExecute(Sender: TObject);
var Form:TfrmChild;
begin
  If IsFormNotCreated('frmChild') then //überprüft nur ob Childfenster existiert,
                                       // wenn ja wird es mit frmChild.bringtofront nach Vorne gebracht
  begin
   Form:=TfrmChild.Create(Application.MainForm);
   Form.SetCoolBar(clbMain); // CoolBar des Hauptformular wird mit der ToolBar (CoolBand mit Toolbar) des Childforms erweitert
   Form.Tag:=CreateNewMenuItem(acChild); //Neuer Eintrag unter dem Menü Fenster
   self.toolbarMain.Menu.Merge(Form.MainMenu); // <-- hier sollen die Menü's vereinigt werden, leider ohne Erfolg
  end;
end;
Leider wird das Menü nicht integriert.
Hat jemand damit Erfahrung?


Alle Zeitangaben in WEZ +1. Es ist jetzt 20:22 Uhr.

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-2025 by Thomas Breitkreuz