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

IDEIntf: added resourcestrings

Browse Source 
git-svn-id: trunk@23020 -
This commit is contained in:
mattias 2009-12-08 09:40:45 +00:00
parent a533956c13
commit b0f209cfa3
2 changed files with 6 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
ideintf/actionseditor.pas
View File

@ -753,9 +753,9 @@ begin
OldAction:=nil;
except
on E: Exception do begin
MessageDlg('Error deleting action',
'Error while deleting action:'#13
+E.Message,mtError,[mbOk],0);
MessageDlg(oisErrorDeletingAction,
Format(oisErrorWhileDeletingAction, [#13, E.Message]), mtError, [mbOk
], 0);
end;
end;
end;
@ -828,6 +828,7 @@ begin
SBShowMenuNewActions.Hint := cActionListEditorNewAction;
mItemToolBarNewAction.Caption := cActionListEditorNewAction;
mItemToolBarNewStdAction.Caption := cActionListEditorNewStdAction;
mItemActListNewAction.Caption := cActionListEditorNewAction;
mItemActListNewStdAction.Caption := cActionListEditorNewStdAction;
mItemActListMoveDownAction.Caption := cActionListEditorMoveDownAction;
mItemActListMoveUpAction.Caption := cActionListEditorMoveUpAction;

2
ideintf/objinspstrconsts.pas
View File

@ -224,6 +224,8 @@ resourcestring
oisEditActionList = 'Edit action list...';
oisActionListEditor = 'Action List Editor';
oisErrorDeletingAction = 'Error deleting action';
oisErrorWhileDeletingAction = 'Error while deleting action:%s%s';
cActionListEditorNewAction = 'New Action';
cActionListEditorNewStdAction = 'New Standard Action';
cActionListEditorMoveDownAction = 'Move Down';