paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-04-23 04:39:36 +02:00
Code Issues Packages Projects Releases Wiki Activity

IDE: Src Editor: popup menu: switched move flags section to sub menu

Browse Source 
git-svn-id: trunk@14499 -
This commit is contained in:
mattias 2008-03-12 11:37:28 +00:00
parent 99fe112e0a
commit 580e37d62a
3 changed files with 10 additions and 9 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
ide/lazarusidestrconsts.pas
View File

@ -1,4 +1,3 @@
{ $Id$ }
{
/***************************************************************************
lazarusidestrconsts.pas
@ -3669,6 +3668,7 @@ resourcestring
lisNotImplementedYet = 'Not implemented yet:%s%s';
lisOpenFile2 = 'Open File ...';
lisMovePage = 'Move Page ...';
lisFileSettings = 'File Settings ...';
implementation

11
ide/uniteditor.pp
View File

@ -1012,9 +1012,9 @@ begin
'InsertTodo',uemInsertTodo, nil, nil, nil, 'item_todo');
// register the Flags section
SrcEditMenuSectionFlags:=RegisterIDEMenuSection(SourceEditorMenuRoot,
'Flags section');
AParent:=SrcEditMenuSectionFlags;
SrcEditSubMenuFlags:=RegisterIDESubMenu(SourceEditorMenuRoot,
'Flags section', lisFileSettings);
AParent:=SrcEditSubMenuFlags;
SrcEditMenuReadOnly:=RegisterIDEMenuCommand(AParent,'ReadOnly',uemReadOnly);
SrcEditMenuReadOnly.ShowAlwaysCheckable:=true;
SrcEditMenuShowLineNumbers:=RegisterIDEMenuCommand(AParent,
@ -1024,8 +1024,9 @@ begin
uemShowUnitInfo);
SrcEditSubMenuHighlighter:=RegisterIDESubMenu(AParent,'Highlighter',
uemHighlighter);
SrcEditMenuEditorProperties:=RegisterIDEMenuCommand(AParent,
'EditorProperties',uemEditorProperties, nil, nil, nil, 'menu_editor_options');
SrcEditMenuEditorProperties:=RegisterIDEMenuCommand(SourceEditorMenuRoot,
'EditorProperties',uemEditorProperties, nil, nil, nil, 'menu_editor_options');
end;

6
ideintf/menuintf.pas
View File

@ -374,14 +374,14 @@ var
// Source Editor: File Specific dynamic section
// The items are cleared automatically after each popup.
SrcEditMenuSectionFileDynamic: TIDEMenuSection;
SrcEditSubMenuMovePage: TIDEMenuSection;
SrcEditMenuSectionClipboard: TIDEMenuSection;
SrcEditMenuSectionMarks: TIDEMenuSection;
SrcEditSubMenuGotoBookmarks: TIDEMenuSection;
SrcEditSubMenuSetBookmarks: TIDEMenuSection;
SrcEditMenuSectionFlags: TIDEMenuSection;
SrcEditSubMenuHighlighter: TIDEMenuSection;
SrcEditSubMenuFlags: TIDEMenuSection;
SrcEditSubMenuHighlighter: TIDEMenuSection;
SrcEditSubMenuDebug: TIDEMenuSection;
SrcEditSubMenuMovePage: TIDEMenuSection;
SrcEditSubMenuRefactor: TIDEMenuSection;
// Messages window popupmenu