added resourcestrings for property editor of TMaskEdit

git-svn-id: trunk@7577 -
This commit is contained in:
mattias 2005-08-27 13:05:37 +00:00
parent 7bccdc9896
commit 7d6ed9e626
4 changed files with 64 additions and 65 deletions

View File

@ -13,7 +13,6 @@ object MaskEditorForm: TMaskEditorForm
Top = 248
Width = 507
object InputMaskLabel: TLabel
BorderSpacing.OnChange = nil
Caption = '&Input Mask:'
Color = clNone
FocusControl = InputMaskEdit
@ -23,7 +22,6 @@ object MaskEditorForm: TMaskEditorForm
Width = 65
end
object SampleMasksLabel: TLabel
BorderSpacing.OnChange = nil
Caption = '&Sample Masks:'
Color = clNone
Left = 208
@ -32,7 +30,6 @@ object MaskEditorForm: TMaskEditorForm
Width = 192
end
object CharactersForBlanksLabel: TLabel
BorderSpacing.OnChange = nil
Caption = 'Character for Blanks:'
Color = clNone
FocusControl = CharactersForBlanksEdit
@ -42,7 +39,6 @@ object MaskEditorForm: TMaskEditorForm
Width = 118
end
object InputMaskEdit: TEdit
BorderSpacing.OnChange = nil
OnChange = InputMaskEditChange
TabOrder = 0
Left = 8
@ -52,7 +48,6 @@ object MaskEditorForm: TMaskEditorForm
end
object SampleMasksListBox: TListBox
Anchors = [akTop, akLeft, akRight, akBottom]
BorderSpacing.OnChange = nil
OnClick = SampleMasksListBoxClick
TabOrder = 1
TopIndex = -1
@ -63,7 +58,6 @@ object MaskEditorForm: TMaskEditorForm
end
object OkButton: TButton
Anchors = [akRight, akBottom]
BorderSpacing.OnChange = nil
Caption = 'OK'
ModalResult = 1
TabOrder = 2
@ -74,7 +68,6 @@ object MaskEditorForm: TMaskEditorForm
end
object CancelButton: TButton
Anchors = [akRight, akBottom]
BorderSpacing.OnChange = nil
Caption = 'Cancel'
ModalResult = 2
TabOrder = 3
@ -85,7 +78,6 @@ object MaskEditorForm: TMaskEditorForm
end
object HelpButton: TButton
Anchors = [akRight, akBottom]
BorderSpacing.OnChange = nil
Caption = '&Help'
TabOrder = 4
Left = 423
@ -95,7 +87,6 @@ object MaskEditorForm: TMaskEditorForm
end
object LoadSampleMasksButton: TButton
Anchors = [akLeft, akBottom]
BorderSpacing.OnChange = nil
Caption = '&Masks...'
OnClick = LoadSampleMasksButtonClick
TabOrder = 5
@ -106,7 +97,6 @@ object MaskEditorForm: TMaskEditorForm
end
object CharactersForBlanksEdit: TEdit
Anchors = [akTop, akLeft, akRight]
BorderSpacing.OnChange = nil
BorderSpacing.Left = 3
MaxLength = 1
OnChange = CharactersForBlankEditChange
@ -120,7 +110,6 @@ object MaskEditorForm: TMaskEditorForm
Width = 71
end
object SaveLiteralCheckBox: TCheckBox
BorderSpacing.OnChange = nil
Caption = 'Save &Literal Characters'
OnClick = SaveLiteralCheckBoxClick
TabOrder = 7
@ -130,8 +119,7 @@ object MaskEditorForm: TMaskEditorForm
Top = 88
Width = 194
end
object Panel1: TPanel
BorderSpacing.OnChange = nil
object TestInputPanel: TPanel
BevelInner = bvRaised
BevelOuter = bvLowered
ClientHeight = 66
@ -143,7 +131,6 @@ object MaskEditorForm: TMaskEditorForm
Top = 118
Width = 192
object TestInputLabel: TLabel
BorderSpacing.OnChange = nil
Caption = '&Test Input:'
Color = clNone
Left = 8
@ -152,7 +139,6 @@ object MaskEditorForm: TMaskEditorForm
Width = 65
end
object TestMaskEdit: TMaskEdit
BorderSpacing.OnChange = nil
TabOrder = 0
Left = 8
Height = 23

View File

@ -6,52 +6,47 @@ LazarusResources.Add('TMaskEditorForm','FORMDATA',[
+#251#1#8'OnCreate'#7#20'MaskEditorFormCreate'#13'PixelsPerInch'#2'p'#8'Posit'
+'ion'#7#15'poDesktopCenter'#18'HorzScrollBar.Page'#3#250#1#18'VertScrollBar.'
+'Page'#3#238#0#4'Left'#3#202#1#6'Height'#3#239#0#3'Top'#3#248#0#5'Width'#3
+#251#1#0#6'TLabel'#14'InputMaskLabel'#22'BorderSpacing.OnChange'#13#7'Captio'
+'n'#6#12'&Input Mask:'#5'Color'#7#6'clNone'#12'FocusControl'#7#13'InputMaskE'
+'dit'#4'Left'#2#8#6'Height'#2#17#3'Top'#2#8#5'Width'#2'A'#0#0#6'TLabel'#16'S'
+'ampleMasksLabel'#22'BorderSpacing.OnChange'#13#7'Caption'#6#14'&Sample Mask'
+'s:'#5'Color'#7#6'clNone'#4'Left'#3#208#0#6'Height'#2#17#3'Top'#2#5#5'Width'
+#3#192#0#0#0#6'TLabel'#24'CharactersForBlanksLabel'#22'BorderSpacing.OnChang'
+'e'#13#7'Caption'#6#21'Character for Blanks:'#5'Color'#7#6'clNone'#12'FocusC'
+'ontrol'#7#23'CharactersForBlanksEdit'#4'Left'#2#8#6'Height'#2#17#3'Top'#2'>'
+#5'Width'#2'v'#0#0#5'TEdit'#13'InputMaskEdit'#22'BorderSpacing.OnChange'#13#8
+'OnChange'#7#19'InputMaskEditChange'#8'TabOrder'#2#0#4'Left'#2#8#6'Height'#2
+#23#3'Top'#2#24#5'Width'#3#192#0#0#0#8'TListBox'#18'SampleMasksListBox'#7'An'
+'chors'#11#5'akTop'#6'akLeft'#7'akRight'#8'akBottom'#0#22'BorderSpacing.OnCh'
+'ange'#13#7'OnClick'#7#23'SampleMasksListBoxClick'#8'TabOrder'#2#1#8'TopInde'
+'x'#2#255#4'Left'#3#208#0#6'Height'#3#174#0#3'Top'#2#24#5'Width'#3#31#1#0#0#7
+'TButton'#8'OkButton'#7'Anchors'#11#7'akRight'#8'akBottom'#0#22'BorderSpacin'
+'g.OnChange'#13#7'Caption'#6#2'OK'#11'ModalResult'#2#1#8'TabOrder'#2#2#4'Lef'
+'t'#3#7#1#6'Height'#2#25#3'Top'#3#206#0#5'Width'#2'K'#0#0#7'TButton'#12'Canc'
+'elButton'#7'Anchors'#11#7'akRight'#8'akBottom'#0#22'BorderSpacing.OnChange'
+#13#7'Caption'#6#6'Cancel'#11'ModalResult'#2#2#8'TabOrder'#2#3#4'Left'#3'W'#1
+#6'Height'#2#25#3'Top'#3#206#0#5'Width'#2'K'#0#0#7'TButton'#10'HelpButton'#7
+'Anchors'#11#7'akRight'#8'akBottom'#0#22'BorderSpacing.OnChange'#13#7'Captio'
+'n'#6#5'&Help'#8'TabOrder'#2#4#4'Left'#3#167#1#6'Height'#2#25#3'Top'#3#206#0
+#5'Width'#2'K'#0#0#7'TButton'#21'LoadSampleMasksButton'#7'Anchors'#11#6'akLe'
+'ft'#8'akBottom'#0#22'BorderSpacing.OnChange'#13#7'Caption'#6#9'&Masks...'#7
+'OnClick'#7#26'LoadSampleMasksButtonClick'#8'TabOrder'#2#5#4'Left'#2#16#6'He'
+'ight'#2#25#3'Top'#3#206#0#5'Width'#2'K'#0#0#5'TEdit'#23'CharactersForBlanks'
+'Edit'#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'#0#22'BorderSpacing.OnChan'
+'ge'#13#18'BorderSpacing.Left'#2#3#9'MaxLength'#2#1#8'OnChange'#7#28'Charact'
+'ersForBlankEditChange'#8'TabOrder'#2#6#22'AnchorSideLeft.Control'#7#24'Char'
+'actersForBlanksLabel'#23'AnchorSideRight.Control'#7#13'InputMaskEdit'#20'An'
+'chorSideRight.Side'#7#9'asrBottom'#4'Left'#3#129#0#6'Height'#2#23#3'Top'#2
+'8'#5'Width'#2'G'#0#0#9'TCheckBox'#19'SaveLiteralCheckBox'#22'BorderSpacing.'
+'OnChange'#13#7'Caption'#6#24'Save &Literal Characters'#7'OnClick'#7#24'Save'
+'LiteralCheckBoxClick'#8'TabOrder'#2#7#11'UseOnChange'#9#4'Left'#2#8#6'Heigh'
+'t'#2#23#3'Top'#2'X'#5'Width'#3#194#0#0#0#6'TPanel'#6'Panel1'#22'BorderSpaci'
+'ng.OnChange'#13#10'BevelInner'#7#8'bvRaised'#10'BevelOuter'#7#9'bvLowered'
+#12'ClientHeight'#2'B'#11'ClientWidth'#3#192#0#11'FullRepaint'#8#8'TabOrder'
+#2#8#4'Left'#2#8#6'Height'#2'B'#3'Top'#2'v'#5'Width'#3#192#0#0#6'TLabel'#14
+'TestInputLabel'#22'BorderSpacing.OnChange'#13#7'Caption'#6#12'&Test Input:'
+#5'Color'#7#6'clNone'#4'Left'#2#8#6'Height'#2#17#3'Top'#2#6#5'Width'#2'A'#0#0
+#9'TMaskEdit'#12'TestMaskEdit'#22'BorderSpacing.OnChange'#13#8'TabOrder'#2#0
+#4'Left'#2#8#6'Height'#2#23#3'Top'#2#26#5'Width'#3#176#0#0#0#0#11'TOpenDialo'
+'g'#11'OpenDialog1'#7'Options'#11#13'ofNoChangeDir'#14'ofEnableSizing'#12'of'
+'ViewDetail'#0#5'Title'#6#25#206#242#234#240#251#242#252' '#241#243#249#229
+#241#242#226#243#254#249#232#233' '#244#224#233#235#10'DefaultExt'#6#4'.dem'
+#6'Filter'#6',Edit Masks (*.dem)|*.dem|All Files (*.*)|*.*'#11'FilterIndex'#2
+#0#5'Title'#6#25#206#242#234#240#251#242#252' '#241#243#249#229#241#242#226
+#243#254#249#232#233' '#244#224#233#235#4'left'#2'0'#3'top'#3#240#0#0#0#0
+#251#1#0#6'TLabel'#14'InputMaskLabel'#7'Caption'#6#12'&Input Mask:'#5'Color'
+#7#6'clNone'#12'FocusControl'#7#13'InputMaskEdit'#4'Left'#2#8#6'Height'#2#17
+#3'Top'#2#8#5'Width'#2'A'#0#0#6'TLabel'#16'SampleMasksLabel'#7'Caption'#6#14
+'&Sample Masks:'#5'Color'#7#6'clNone'#4'Left'#3#208#0#6'Height'#2#17#3'Top'#2
+#5#5'Width'#3#192#0#0#0#6'TLabel'#24'CharactersForBlanksLabel'#7'Caption'#6
+#21'Character for Blanks:'#5'Color'#7#6'clNone'#12'FocusControl'#7#23'Charac'
+'tersForBlanksEdit'#4'Left'#2#8#6'Height'#2#17#3'Top'#2'>'#5'Width'#2'v'#0#0
+#5'TEdit'#13'InputMaskEdit'#8'OnChange'#7#19'InputMaskEditChange'#8'TabOrder'
+#2#0#4'Left'#2#8#6'Height'#2#23#3'Top'#2#24#5'Width'#3#192#0#0#0#8'TListBox'
+#18'SampleMasksListBox'#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'#8'akBott'
+'om'#0#7'OnClick'#7#23'SampleMasksListBoxClick'#8'TabOrder'#2#1#8'TopIndex'#2
+#255#4'Left'#3#208#0#6'Height'#3#174#0#3'Top'#2#24#5'Width'#3#31#1#0#0#7'TBu'
+'tton'#8'OkButton'#7'Anchors'#11#7'akRight'#8'akBottom'#0#7'Caption'#6#2'OK'
+#11'ModalResult'#2#1#8'TabOrder'#2#2#4'Left'#3#7#1#6'Height'#2#25#3'Top'#3
+#206#0#5'Width'#2'K'#0#0#7'TButton'#12'CancelButton'#7'Anchors'#11#7'akRight'
+#8'akBottom'#0#7'Caption'#6#6'Cancel'#11'ModalResult'#2#2#8'TabOrder'#2#3#4
+'Left'#3'W'#1#6'Height'#2#25#3'Top'#3#206#0#5'Width'#2'K'#0#0#7'TButton'#10
+'HelpButton'#7'Anchors'#11#7'akRight'#8'akBottom'#0#7'Caption'#6#5'&Help'#8
+'TabOrder'#2#4#4'Left'#3#167#1#6'Height'#2#25#3'Top'#3#206#0#5'Width'#2'K'#0
+#0#7'TButton'#21'LoadSampleMasksButton'#7'Anchors'#11#6'akLeft'#8'akBottom'#0
+#7'Caption'#6#9'&Masks...'#7'OnClick'#7#26'LoadSampleMasksButtonClick'#8'Tab'
+'Order'#2#5#4'Left'#2#16#6'Height'#2#25#3'Top'#3#206#0#5'Width'#2'K'#0#0#5'T'
+'Edit'#23'CharactersForBlanksEdit'#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRigh'
+'t'#0#18'BorderSpacing.Left'#2#3#9'MaxLength'#2#1#8'OnChange'#7#28'Character'
+'sForBlankEditChange'#8'TabOrder'#2#6#22'AnchorSideLeft.Control'#7#24'Charac'
+'tersForBlanksLabel'#23'AnchorSideRight.Control'#7#13'InputMaskEdit'#20'Anch'
+'orSideRight.Side'#7#9'asrBottom'#4'Left'#3#129#0#6'Height'#2#23#3'Top'#2'8'
+#5'Width'#2'G'#0#0#9'TCheckBox'#19'SaveLiteralCheckBox'#7'Caption'#6#24'Save'
+' &Literal Characters'#7'OnClick'#7#24'SaveLiteralCheckBoxClick'#8'TabOrder'
+#2#7#11'UseOnChange'#9#4'Left'#2#8#6'Height'#2#23#3'Top'#2'X'#5'Width'#3#194
+#0#0#0#6'TPanel'#14'TestInputPanel'#10'BevelInner'#7#8'bvRaised'#10'BevelOut'
+'er'#7#9'bvLowered'#12'ClientHeight'#2'B'#11'ClientWidth'#3#192#0#11'FullRep'
+'aint'#8#8'TabOrder'#2#8#4'Left'#2#8#6'Height'#2'B'#3'Top'#2'v'#5'Width'#3
+#192#0#0#6'TLabel'#14'TestInputLabel'#7'Caption'#6#12'&Test Input:'#5'Color'
+#7#6'clNone'#4'Left'#2#8#6'Height'#2#17#3'Top'#2#6#5'Width'#2'A'#0#0#9'TMask'
+'Edit'#12'TestMaskEdit'#8'TabOrder'#2#0#4'Left'#2#8#6'Height'#2#23#3'Top'#2
+#26#5'Width'#3#176#0#0#0#0#11'TOpenDialog'#11'OpenDialog1'#7'Options'#11#13
+'ofNoChangeDir'#14'ofEnableSizing'#12'ofViewDetail'#0#5'Title'#6#25#206#242
+#234#240#251#242#252' '#241#243#249#229#241#242#226#243#254#249#232#233' '
+#244#224#233#235#10'DefaultExt'#6#4'.dem'#6'Filter'#6',Edit Masks (*.dem)|*.'
+'dem|All Files (*.*)|*.*'#11'FilterIndex'#2#0#5'Title'#6#25#206#242#234#240
+#251#242#252' '#241#243#249#229#241#242#226#243#254#249#232#233' '#244#224
+#233#235#4'left'#2'0'#3'top'#3#240#0#0#0#0
]);

View File

@ -25,7 +25,8 @@ interface
uses
Classes, SysUtils, LResources, Forms, Controls, Graphics, Dialogs, StdCtrls,
Buttons, ExtCtrls, FileUtil, MaskEdit, LazIDEIntf, PropEdits, TypInfo;
Buttons, ExtCtrls, FileUtil, MaskEdit, LazIDEIntf, PropEdits,
ObjInspStrConsts;
type
@ -46,7 +47,7 @@ type
SampleMasksListBox: TListBox;
TestMaskEdit: TMaskEdit;
OpenDialog1: TOpenDialog;
Panel1: TPanel;
TestInputPanel: TPanel;
procedure LoadSampleMasksButtonClick(Sender: TObject);
procedure SaveLiteralCheckBoxClick(Sender: TObject);
procedure InputMaskEditChange(Sender: TObject);
@ -132,6 +133,16 @@ procedure TMaskEditorForm.MaskEditorFormCreate(Sender: TObject);
var
aDemFile:string;
begin
OkButton.Caption:=oisOk2;
CancelButton.Caption:=oiStdActDataSetCancel1Hint;
HelpButton.Caption:=cActionListEditorHelpCategory;
LoadSampleMasksButton.Caption:=oisMasks;
SaveLiteralCheckBox.Caption:=oisSaveLiteralCharacters;
InputMaskLabel.Caption:=oisInputMask;
SampleMasksLabel.Caption:=oisSampleMasks;
CharactersForBlanksLabel.Caption:=oisCharactersForBlanks;
TestInputLabel.Caption:=oisTestInput;
if LazarusIDE<>nil then
aDemFile:=LazarusIDE.GetPrimaryConfigPath
else

View File

@ -116,6 +116,12 @@ resourcestring
cActionListEditorAllCategory = '(All)';
cActionListEditorEditCategory = 'Edit';
cActionListEditorHelpCategory = 'Help';
oisMasks = 'Masks...';
oisSaveLiteralCharacters = 'Save Literal Characters';
oisInputMask = 'Input Mask:';
oisSampleMasks = 'Sample Masks:';
oisCharactersForBlanks = 'Characters for Blanks';
oisTestInput = 'Test Input';
cActionListEditorDialogCategory = 'Dialog';
cActionListEditorFileCategory = 'File';
cActionListEditorDatabaseCategory = 'Database';
@ -242,6 +248,7 @@ resourcestring
oisClear = 'C&lear';
oisErrorLoadingImage = 'Error loading image';
oisErrorLoadingImage2 = 'Error loading image %s%s%s:%s%s';
oisOk2 = 'Ok';
implementation