IDE: fixed i18n regression after r50903 #e9d1b1acd4

git-svn-id: trunk@50968 -
This commit is contained in:
maxim 2015-12-21 22:17:57 +00:00
parent 83664400c7
commit 7052b327d7
3 changed files with 3 additions and 2 deletions

View File

@ -142,7 +142,7 @@ begin
MoveUpButton.Caption:=lisUp;
MoveDownButton.Caption:=lisDown;
ExtraButton.Caption:=lisMore;
ExtraButton.Caption:=lisMoreSub;
ExtraButton.Style:=tbsButtonDrop;
MenuItemClone.Caption:=lisClone;
MenuItemExport.Caption:=lisDlgExport;

View File

@ -125,6 +125,7 @@ resourcestring
lisOptions = 'Options';
lisLess = 'Less';
lisMore = 'More';
lisMoreSub = 'More';
lisDlgMore = 'More ...';
lisDefault = 'Default';
lisClone = 'Clone';

View File

@ -1915,7 +1915,7 @@ begin
CreateDivider;
OptionsBitBtn := CreateToolButton('OptionsBitBtn', lisOptions, lisPckEditEditGeneralOptions, 'pkg_properties', @OptionsBitBtnClick);
HelpBitBtn := CreateToolButton('HelpBitBtn', GetButtonCaption(idButtonHelp), lisMenuOnlineHelp, 'menu_help', @HelpBitBtnClick);
MoreBitBtn := CreateToolButton('MoreBitBtn', lisMore, lisPkgEdMoreFunctionsForThePackage, '', nil);
MoreBitBtn := CreateToolButton('MoreBitBtn', lisMoreSub, lisPkgEdMoreFunctionsForThePackage, '', nil);
MoreBitBtn.Style:=tbsButtonDrop;
UseBitBtn.DropdownMenu := UsePopupMenu;