paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-09-25 16:09:17 +02:00
Code Issues Packages Projects Releases Wiki Activity

IDE: menu designer: hints for add separator buttons

Browse Source 
git-svn-id: trunk@54819 -
This commit is contained in:
mattias 2017-05-07 08:07:31 +00:00
parent 9e26dc8414
commit 8143524542
2 changed files with 6 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
designer/menueditor.pp
View File

@ -1229,10 +1229,12 @@ begin
popAddSeparatorBefore: begin
NewPopSub(primaryItem, lisMenuEditorAddSeparatorBefore, @AddSeparatorAbove);
AddSeparatorAboveButton.Action:=ac;
ac.Hint:=lisAddANewSeparatorAboveSelectedItem;
end;
popAddSeparatorAfter: begin
NewPopSub(primaryItem, lisMenuEditorAddSeparatorAfter, @AddSeparatorBelow);
AddSeparatorBelowButton.Action:=ac;
ac.Hint:=lisAddANewSeparatorBelowSelectedItem;
end;
popRemoveAllSeparators:
NewPopSub(primaryItem, lisMenuEditorRemoveAllSeparators, @RemoveAllSeparators);

4
ide/lazarusidestrconsts.pas
View File

@ -4779,6 +4779,10 @@ resourcestring
// menu editor
lisMenuEditorMenuEditor = 'Menu Editor';
lisAddANewSeparatorAboveSelectedItem = 'Add a new separator above selected '
+'item';
lisAddANewSeparatorBelowSelectedItem = 'Add a new separator below selected '
+'item';
lisMenuEditorAcceleratorKeySNeedsChanging = 'Accelerator(&&) key "%s" needs changing';
lisMenuEditorAddANewItemAboveSelectedItem = 'Add a new item above selected item';
lisMenuEditorAddANewItemAfterSelectedItem = 'Add a new item after selected item';