![]() |
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:
Leider wird das Menü nicht integriert.
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; 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