Browse Source

* initialize edit menu to disabled, bug #6614

git-svn-id: trunk@12531 -
marco 16 years ago
parent
commit
6916115086
1 changed files with 1 additions and 0 deletions
  1. 1 0
      ide/fpide.pas

+ 1 - 0
ide/fpide.pas

@@ -1008,6 +1008,7 @@ begin
       NewItem(menu_help_about,'',kbNoKey, cmAbout, hcAbout,
       NewItem(menu_help_about,'',kbNoKey, cmAbout, hcAbout,
       nil))))))))),
       nil))))))))),
     nil)))))))))))));
     nil)))))))))))));
+   SetCmdState(ToClipCmds+FromClipCmds+NulClipCmds+UndoCmd+RedoCmd,false);
 end;
 end;
 
 
 procedure TIDEApp.InitMenuBar;
 procedure TIDEApp.InitMenuBar;