IDE: remove some redundant UpdateWindowMenu calls. It is called when Window menu opens.

git-svn-id: trunk@39171 -
This commit is contained in:
juha 2012-10-27 16:36:16 +00:00
parent b4b5258a4a
commit 856fe390f2

View File

@ -1430,8 +1430,6 @@ begin
// load package configs // load package configs
HelpBoss.LoadHelpOptions; HelpBoss.LoadHelpOptions;
UpdateWindowMenu(true);
end; end;
procedure TMainIDE.StartIDE; procedure TMainIDE.StartIDE;
@ -2199,7 +2197,6 @@ begin
DoNewProject(ProjectDescriptorApplication); DoNewProject(ProjectDescriptorApplication);
end; end;
end; end;
UpdateWindowMenu(true);
// load the cmd line files // load the cmd line files
if CmdLineFiles<>nil then begin if CmdLineFiles<>nil then begin
@ -12518,7 +12515,6 @@ begin
then then
exit; exit;
WindowMenuActiveForm := Screen.ActiveForm; WindowMenuActiveForm := Screen.ActiveForm;
UpdateWindowMenu(True);
end; end;
procedure TMainIDE.OnScreenRemoveForm(Sender: TObject; AForm: TCustomForm); procedure TMainIDE.OnScreenRemoveForm(Sender: TObject; AForm: TCustomForm);