IDE: Adds missing and improved menu icons by Roland Hahn.

components/ideintf/images/ideintf_images_list.txt

@@ -7,6 +7,7 @@ laz_copy_200.png
 laz_cut.png
 laz_cut_150.png
 laz_cut_200.png
+laz_multipaste.png
 laz_paste.png
 laz_paste_150.png
 laz_paste_200.png

ide/mainbase.pas

@@ -993,17 +993,17 @@ begin
     CreateMenuItem(ParentMI,itmEditCut,'itmEditCut',lisCut,'laz_cut');
     CreateMenuItem(ParentMI,itmEditCopy,'itmEditCopy',lisCopy,'laz_copy');
     CreateMenuItem(ParentMI,itmEditPaste,'itmEditPaste',lisPaste,'laz_paste');
-    CreateMenuItem(ParentMI,itmEditMultiPaste,'itmEditMultiPaste',lisMenuMultiPaste);
+    CreateMenuItem(ParentMI,itmEditMultiPaste,'itmEditMultiPaste',lisMenuMultiPaste, 'laz_multipaste');
 
     // "Select" menu items
     CreateMenuSeparatorSection(mnuEdit,itmEditSelect,'itmEditSelect');
     ParentMI:=itmEditSelect;
-    CreateMenuItem(ParentMI,itmEditSelectAll,'itmEditSelectAll',lisMenuSelectAll, 'menu_select_all');
-    CreateMenuItem(ParentMI,itmEditSelectToBrace,'itmEditSelectToBrace',lisMenuSelectToBrace);
-    CreateMenuItem(ParentMI,itmEditSelectCodeBlock,'itmEditSelectCodeBlock',lisMenuSelectCodeBlock);
-    CreateMenuItem(ParentMI,itmEditSelectWord,'itmEditSelectWord',lisMenuSelectWord);
-    CreateMenuItem(ParentMI,itmEditSelectLine,'itmEditSelectLine',lisMenuSelectLine);
-    CreateMenuItem(ParentMI,itmEditSelectParagraph,'itmEditSelectParagraph',lisMenuSelectParagraph);
+    CreateMenuItem(ParentMI,itmEditSelectAll,'itmEditSelectAll',lisMenuSelectAll, 'menu_edit_select_all');
+    CreateMenuItem(ParentMI,itmEditSelectToBrace,'itmEditSelectToBrace',lisMenuSelectToBrace, 'menu_edit_select_tobrace');
+    CreateMenuItem(ParentMI,itmEditSelectCodeBlock,'itmEditSelectCodeBlock',lisMenuSelectCodeBlock, 'menu_edit_select_codeblock');
+    CreateMenuItem(ParentMI,itmEditSelectWord,'itmEditSelectWord',lisMenuSelectWord, 'menu_edit_select_word');
+    CreateMenuItem(ParentMI,itmEditSelectLine,'itmEditSelectLine',lisMenuSelectLine, 'menu_edit_select_line');
+    CreateMenuItem(ParentMI,itmEditSelectParagraph,'itmEditSelectParagraph',lisMenuSelectParagraph, 'menu_edit_select_paragraph');
 
     // "Char Conversion" menu items
     CreateMenuSeparatorSection(mnuEdit,itmEditBlockActions,'itmEditBlockActions');
@@ -1012,15 +1012,15 @@ begin
     CreateMenuItem(ParentMI,itmEditUnindentBlock,'itmEditUnindentBlock',lisMenuUnindentSelection,'menu_unindent');
     CreateMenuItem(ParentMI,itmEditUpperCaseBlock,'itmEditUpperCaseBlock',lisMenuUpperCaseSelection, 'menu_edit_uppercase');
     CreateMenuItem(ParentMI,itmEditLowerCaseBlock,'itmEditLowerCaseBlock',lisMenuLowerCaseSelection, 'menu_edit_lowercase');
-    CreateMenuItem(ParentMI,itmEditSwapCaseBlock,'itmEditSwapCaseBlock',lisMenuSwapCaseSelection, 'menu_edit_uppercase');
+    CreateMenuItem(ParentMI,itmEditSwapCaseBlock,'itmEditSwapCaseBlock',lisMenuSwapCaseSelection, 'menu_edit_swapcase');
     CreateMenuItem(ParentMI,itmEditSortBlock,'itmEditSortBlock',lisMenuSortSelection, 'menu_edit_sort');
-    CreateMenuItem(ParentMI,itmEditTabsToSpacesBlock,'itmEditTabsToSpacesBlock',lisMenuTabsToSpacesSelection);
-    CreateMenuItem(ParentMI,itmEditSelectionBreakLines,'itmEditSelectionBreakLines',lisMenuBeakLinesInSelection);
+    CreateMenuItem(ParentMI,itmEditTabsToSpacesBlock,'itmEditTabsToSpacesBlock',lisMenuTabsToSpacesSelection, 'menu_edit_tabstospaces');
+    CreateMenuItem(ParentMI,itmEditSelectionBreakLines,'itmEditSelectionBreakLines',lisMenuBeakLinesInSelection, 'menu_edit_breaklines');
 
     // *** insert text ***:
     CreateMenuSeparatorSection(mnuEdit,itmEditInsertions,'itmEditInsertions');
     ParentMI:=itmEditInsertions;
-    CreateMenuItem(ParentMI,itmEditInsertCharacter,'itmEditInsertCharacter',lisMenuInsertCharacter);
+    CreateMenuItem(ParentMI,itmEditInsertCharacter,'itmEditInsertCharacter',lisMenuInsertCharacter, 'menu_edit_insertcharacter');
   end;
 end;
 
@@ -1123,7 +1123,7 @@ begin
       CreateMenuItem(itmViewDebugWindows,itmViewRegisters,'itmViewRegisters',lisMenuViewRegisters);
       CreateMenuItem(itmViewDebugWindows,itmViewCallStack,'itmViewCallStack',lisMenuViewCallStack,'debugger_call_stack');
       CreateMenuItem(itmViewDebugWindows,itmViewThreads,'itmViewThreads',lisMenuViewThreads);
-      CreateMenuItem(itmViewDebugWindows,itmViewAssembler,'itmViewAssembler',lisMenuViewAssembler);
+      CreateMenuItem(itmViewDebugWindows,itmViewAssembler,'itmViewAssembler',lisMenuViewAssembler, 'debugger_assembler');
       CreateMenuItem(itmViewDebugWindows,itmViewDebugEvents,'itmViewDebugEvents',lisMenuViewDebugEvents,'debugger_event_log');
       CreateMenuItem(itmViewDebugWindows,itmViewDbgHistory,'itmViewDbgHistory',lisMenuViewHistory);
     end;
@@ -1152,7 +1152,7 @@ begin
     CreateMenuItem(ParentMI,itmSourceToggleComment,'itmSourceToggleComment',lisMenuToggleComment, 'menu_comment');
     CreateMenuItem(ParentMI,itmSourceEncloseBlock,'itmSourceEncloseBlock',lisMenuEncloseSelection);
     CreateMenuItem(ParentMI,itmSourceEncloseInIFDEF,'itmSourceEncloseInIFDEF',lisMenuEncloseInIFDEF);
-    CreateMenuItem(ParentMI,itmSourceCompleteCodeInteractive,'itmSourceCompleteCodeInteractive',lisMenuCompleteCodeInteractive);
+    CreateMenuItem(ParentMI,itmSourceCompleteCodeInteractive,'itmSourceCompleteCodeInteractive',lisMenuCompleteCodeInteractive, 'menu_source_completecode');
     CreateMenuItem(ParentMI,itmRefactorInvertAssignment,'itmInvertAssignment',uemInvertAssignment);
     CreateMenuItem(ParentMI,itmSourceUseUnit,'itmSourceUseUnit',lisMenuUseUnit);
     // Refactor
@@ -1325,18 +1325,18 @@ begin
     CreateMenuItem(ParentMI,itmPkgNewPackage,'itmPkgNewPackage',lisMenuNewPackage, 'pkg_add');
     CreateMenuItem(ParentMI,itmPkgOpenLoadedPackage,'itmPkgOpenPackage',lisMenuOpenPackage,'pkg_installed');
     CreateMenuItem(ParentMI,itmPkgOpenPackageFile,'itmPkgOpenPackageFile',lisMenuOpenPackageFile,'pkg_open');
-    CreateMenuItem(ParentMI,itmPkgOpenPackageOfCurUnit,'itmPkgOpenPackageOfCurUnit',lisMenuOpenPackageOfCurUnit);
+    CreateMenuItem(ParentMI,itmPkgOpenPackageOfCurUnit,'itmPkgOpenPackageOfCurUnit',lisMenuOpenPackageOfCurUnit,'pkg_open_packageofcurunit');
     CreateMenuSubSection(ParentMI,itmPkgOpenRecent,'itmPkgOpenRecent',lisMenuOpenRecentPkg, 'pkg_open_recent');
 
     CreateMenuSeparatorSection(mnuComponent,itmPkgUnits,'itmPkgUnits');
     ParentMI:=itmPkgUnits;
-    CreateMenuItem(ParentMI,itmPkgAddCurFileToPkg,'itmPkgAddCurFileToPkg',lisMenuAddCurFileToPkg,'pkg_add');
+    CreateMenuItem(ParentMI,itmPkgAddCurFileToPkg,'itmPkgAddCurFileToPkg',lisMenuAddCurFileToPkg,'pkg_new');
     CreateMenuItem(ParentMI, itmPkgAddNewComponentToPkg, 'itmPkgAddNewComponentToPkg', lisMenuNewComponent+' ...', 'pkg_comp_new');
 
     CreateMenuSeparatorSection(mnuComponent,itmPkgGraphSection,'itmPkgGraphSection');
     ParentMI:=itmPkgGraphSection;
     CreateMenuItem(ParentMI,itmPkgPkgGraph,'itmPkgPkgGraph',lisMenuPackageGraph+' ...','pkg_graph');
-    CreateMenuItem(ParentMI,itmPkgPackageLinks,'itmPkgPackageLinks',lisMenuPackageLinks);
+    CreateMenuItem(ParentMI,itmPkgPackageLinks,'itmPkgPackageLinks',lisMenuPackageLinks, 'pkg_links');
     CreateMenuItem(ParentMI,itmPkgEditInstallPkgs,'itmPkgEditInstallPkgs',lisMenuEditInstallPkgs,'pkg_properties');
   end;
 end;
@@ -1463,7 +1463,7 @@ begin
 
   with MainIDEBar do
   case AForm.ClassName of
-    'TCharacterMapDialog':     Exit(-1);                      // for future icon
+    'TCharacterMapDialog':     Exit(itmEditInsertCharacter.ImageIndex);
     'TObjectInspectorDlg':     Exit(itmViewInspector.ImageIndex);
     'TSourceNotebook':         Exit(itmViewSourceEditor.ImageIndex);
     'TMessagesView':           Exit(itmViewMessage.ImageIndex);
@@ -1483,7 +1483,7 @@ begin
     'TRegistersDlg':           Exit(-1);                      // for future icon
     'TCallStackDlg':           Exit(itmViewCallStack.ImageIndex);
     'TThreadsDlg':             Exit(-1);                      // for future icon
-    'TAssemblerDlg':           Exit(-1);                      // for future icon
+    'TAssemblerDlg':           Exit(itmViewAssembler.ImageIndex);
     'TDbgEventsForm':          Exit(-1);                      // for future icon
     'THistoryDialog':          Exit(-1);                      // for future icon
     'TDbgOutputForm':          Exit(itmViewDebugOutput.ImageIndex);

images/laz_images_list.txt

@@ -292,6 +292,9 @@ debugger/clock_200.png
 debugger/debugger.png
 debugger/debugger_150.png
 debugger/debugger_200.png
+debugger/debugger_assembler.png
+debugger/debugger_assembler_150.png
+debugger/debugger_assembler_200.png
 debugger/debugger_breakpoints.png
 debugger/debugger_breakpoints_150.png
 debugger/debugger_breakpoints_200.png
@@ -561,12 +564,42 @@ menu/menu_configure_help_200.png
 menu/menu_editor_options.png
 menu/menu_editor_options_150.png
 menu/menu_editor_options_200.png
+menu/menu_edit_breaklines.png
+menu/menu_edit_breaklines_150.png
+menu/menu_edit_breaklines_200.png
+menu/menu_edit_insertcharacter.png
+menu/menu_edit_insertcharacter_150.png
+menu/menu_edit_insertcharacter_200.png
 menu/menu_edit_lowercase.png
 menu/menu_edit_lowercase_150.png
 menu/menu_edit_lowercase_200.png
+menu/menu_edit_select_all.png
+menu/menu_edit_select_all_150.png
+menu/menu_edit_select_all_200.png
+menu/menu_edit_select_codeblock.png
+menu/menu_edit_select_codeblock_150.png
+menu/menu_edit_select_codeblock_200.png
+menu/menu_edit_select_line.png
+menu/menu_edit_select_line_150.png
+menu/menu_edit_select_line_200.png
+menu/menu_edit_select_paragraph.png
+menu/menu_edit_select_paragraph_150.png
+menu/menu_edit_select_paragraph_200.png
+menu/menu_edit_select_tobrace.png
+menu/menu_edit_select_tobrace_150.png
+menu/menu_edit_select_tobrace_200.png
+menu/menu_edit_select_word.png
+menu/menu_edit_select_word_150.png
+menu/menu_edit_select_word_200.png
 menu/menu_edit_sort.png
 menu/menu_edit_sort_150.png
 menu/menu_edit_sort_200.png
+menu/menu_edit_swapcase.png
+menu/menu_edit_swapcase_150.png
+menu/menu_edit_swapcase_200.png
+menu/menu_edit_tabstospaces.png
+menu/menu_edit_tabstospaces_150.png
+menu/menu_edit_tabstospaces_200.png
 menu/menu_edit_uppercase.png
 menu/menu_edit_uppercase_150.png
 menu/menu_edit_uppercase_200.png
@@ -786,6 +819,9 @@ menu/menu_select_all_200.png
 menu/menu_set_free_bookmark.png
 menu/menu_set_free_bookmark_150.png
 menu/menu_set_free_bookmark_200.png
+menu/menu_source_completecode.png
+menu/menu_source_completecode_150.png
+menu/menu_source_completecode_200.png
 menu/menu_stepinto.png
 menu/menu_stepinto_150.png
 menu/menu_stepinto_200.png
@@ -975,12 +1011,18 @@ packages/pkg_lazarus_overlay_200.png
 packages/pkg_lfm.png
 packages/pkg_lfm_150.png
 packages/pkg_lfm_200.png
+packages/pkg_links.png
+packages/pkg_links_150.png
+packages/pkg_links_200.png
 packages/pkg_lrs.png
 packages/pkg_lrs_150.png
 packages/pkg_lrs_200.png
 packages/pkg_open.png
 packages/pkg_open_150.png
 packages/pkg_open_200.png
+packages/pkg_open_packageofcurunit.png
+packages/pkg_open_packageofcurunit_150.png
+packages/pkg_open_packageofcurunit_200.png
 packages/pkg_open_recent.png
 packages/pkg_open_recent_150.png
 packages/pkg_open_recent_200.png