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

IDEIntf: added resourcestrings

Browse Source 
git-svn-id: trunk@23021 -
This commit is contained in:
mattias 2009-12-08 09:46:51 +00:00
parent b0f209cfa3
commit bb4b1cccd4
3 changed files with 21 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
ideintf/fieldseditor.lfm
View File

@ -64,21 +64,18 @@ object DSFieldsEditorFrm: TDSFieldsEditorFrm
object AddFieldsActn: TAction
Category = 'Fields'
Caption = '&Add fields'
Hint = 'Add fields from FieldDefs'
OnExecute = AddFieldsActnExecute
ShortCut = 16429
end
object DeleteFieldsActn: TAction
Category = 'Fields'
Caption = '&Delete'
Hint = 'Delete selected field(s)'
OnExecute = DeleteFieldsActnExecute
ShortCut = 46
end
object NewActn: TAction
Category = 'Fields'
Caption = '&New'
Hint = 'Create new field and add it at current position'
OnExecute = NewActnExecute
ShortCut = 45
end

11
ideintf/fieldseditor.pas
View File

@ -136,6 +136,17 @@ begin
LinkDataset := ADataset;
FDesigner := ADesigner;
Caption := fesFeTitle + ' - ' + LinkDataset.Name;
AddFieldsActn.Caption := oisAddFields;
AddFieldsActn.Hint := oisAddFieldsFromFieldDefs;
DeleteFieldsActn.Caption:=oiscDelete;
DeleteFieldsActn.Hint:=oisDeleteSelectedFieldS;
NewActn.Caption:=oisNew;
NewActn.Hint:=oisCreateNewFieldAndAddItAtCurrentPosition;
MoveUpActn.Caption:=oisMoveUp;
MoveDownActn.Caption:=oisMoveDown;
SelectAllActn.Caption:=oisSelectAll;
UnselectAllActn.Caption:=oisUnselectAll;
FieldsListBox.Clear;
RefreshFieldsListBox(False);

10
ideintf/objinspstrconsts.pas
View File

@ -26,6 +26,14 @@ resourcestring
oiscAdd = '&Add';
oiscDelete = '&Delete';
oisDeleteSelectedFieldS = 'Delete selected field(s)';
oisNew = '&New';
oisCreateNewFieldAndAddItAtCurrentPosition = 'Create new field and add it '
+'at current position';
oisMoveUp = 'Move &Up';
oisMoveDown = 'Move &Down';
oisSelectAll = '&Select all';
oisUnselectAll = '&Unselect all';
oisConfirmDelete = 'Confirm delete';
oisDeleteItem = 'Delete item %s%s%s?';
oisUnknown = 'Unknown';
@ -361,6 +369,8 @@ resourcestring
// Fields Editor
fesFeTitle = 'Edit Fields';
oisAddFields = '&Add fields';
oisAddFieldsFromFieldDefs = 'Add fields from FieldDefs';
fesNoFields = 'It was not possible to get the dataset field''s list';
fesCheckDset = 'Check dataset settings';
fesFlTitle = 'FieldDefs';