paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2026-01-04 01:22:46 +01:00
Code Issues Packages Projects Releases Wiki Activity

IDE: Set menu items before menu IDECommands. Commands start to obey Enabled state etc.

Browse Source 
git-svn-id: trunk@28387 -
This commit is contained in:
juha 2010-11-22 00:01:19 +00:00
parent 58e4669239
commit 2ae20ca72b
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
ide/main.pp
View File

@ -2254,6 +2254,7 @@ end;
procedure TMainIDE.SetupMainMenu;
begin
inherited SetupMainMenu;
mnuMain.MenuItem:=MainIDEBar.mnuMainMenu.Items;
SetupFileMenu;
SetupEditMenu;
SetupSearchMenu;
@ -2265,7 +2266,6 @@ begin
SetupEnvironmentMenu;
SetupWindowsMenu;
SetupHelpMenu;
mnuMain.MenuItem:=MainIDEBar.mnuMainMenu.Items;
end;
procedure TMainIDE.SetupStandardIDEMenuItems;