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

IDEIntf: localized TToolBar designer menu entries

Browse Source 
git-svn-id: trunk@28358 -
This commit is contained in:
maxim 2010-11-19 23:55:37 +00:00
parent c6791a4c61
commit f3363d1270
2 changed files with 8 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
ideintf/componenteditors.pas
View File

@ -1213,10 +1213,10 @@ end;
function TToolBarComponentEditor.GetVerb(Index: Integer): string;
begin
case Index of
0: Result := 'New Button';
1: Result := 'New Checkbutton';
2: Result := 'New Separator';
3: Result := 'New Divider';
0: Result := tbceNewButton;
1: Result := tbceNewCheckbutton;
2: Result := tbceNewSeparator;
3: Result := tbceNewDivider;
else
Result := '';
end;

4
ideintf/objinspstrconsts.pas
View File

@ -190,6 +190,10 @@ resourcestring
tccesDeleteTab = 'Delete tab';
tccesMoveTabLeft = 'Move tab left';
tccesMoveTabRight = 'Move tab right';
tbceNewButton = 'New Button';
tbceNewCheckbutton = 'New CheckButton';
tbceNewSeparator = 'New Separator';
tbceNewDivider = 'New Divider';
//checklistbox editor
clbCheckListBoxEditor = 'CheckListBox Editor';