mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-04-08 08:38:19 +02:00
fixed title of Open masks file dialog
git-svn-id: trunk@7922 -
This commit is contained in:
vincents
parent
512012bfd3
commit
9756f34667
@ -4,7 +4,7 @@ object MaskEditorForm: TMaskEditorForm
|
||||
ClientHeight = 239
|
||||
ClientWidth = 507
|
||||
OnCreate = MaskEditorFormCreate
|
||||
PixelsPerInch = 112
|
||||
PixelsPerInch = 96
|
||||
Position = poDesktopCenter
|
||||
HorzScrollBar.Page = 506
|
||||
VertScrollBar.Page = 238
|
||||
@ -13,32 +13,36 @@ object MaskEditorForm: TMaskEditorForm
|
||||
Top = 248
|
||||
Width = 507
|
||||
object InputMaskLabel: TLabel
|
||||
BorderSpacing.OnChange = nil
|
||||
Caption = '&Input Mask:'
|
||||
Color = clNone
|
||||
FocusControl = InputMaskEdit
|
||||
Left = 8
|
||||
Height = 17
|
||||
Height = 13
|
||||
Top = 8
|
||||
Width = 65
|
||||
Width = 64
|
||||
end
|
||||
object SampleMasksLabel: TLabel
|
||||
BorderSpacing.OnChange = nil
|
||||
Caption = '&Sample Masks:'
|
||||
Color = clNone
|
||||
Left = 208
|
||||
Height = 17
|
||||
Height = 13
|
||||
Top = 5
|
||||
Width = 192
|
||||
Width = 77
|
||||
end
|
||||
object CharactersForBlanksLabel: TLabel
|
||||
BorderSpacing.OnChange = nil
|
||||
Caption = 'Character for Blanks:'
|
||||
Color = clNone
|
||||
FocusControl = CharactersForBlanksEdit
|
||||
Left = 8
|
||||
Height = 17
|
||||
Height = 13
|
||||
Top = 62
|
||||
Width = 118
|
||||
Width = 102
|
||||
end
|
||||
object InputMaskEdit: TEdit
|
||||
BorderSpacing.OnChange = nil
|
||||
OnChange = InputMaskEditChange
|
||||
TabOrder = 0
|
||||
Left = 8
|
||||
@ -48,9 +52,9 @@ object MaskEditorForm: TMaskEditorForm
|
||||
end
|
||||
object SampleMasksListBox: TListBox
|
||||
Anchors = [akTop, akLeft, akRight, akBottom]
|
||||
BorderSpacing.OnChange = nil
|
||||
OnClick = SampleMasksListBoxClick
|
||||
TabOrder = 1
|
||||
TopIndex = -1
|
||||
Left = 208
|
||||
Height = 174
|
||||
Top = 24
|
||||
@ -58,6 +62,8 @@ object MaskEditorForm: TMaskEditorForm
|
||||
end
|
||||
object OkButton: TButton
|
||||
Anchors = [akRight, akBottom]
|
||||
BorderSpacing.OnChange = nil
|
||||
BorderSpacing.InnerBorder = 2
|
||||
Caption = 'OK'
|
||||
ModalResult = 1
|
||||
TabOrder = 2
|
||||
@ -68,6 +74,8 @@ object MaskEditorForm: TMaskEditorForm
|
||||
end
|
||||
object CancelButton: TButton
|
||||
Anchors = [akRight, akBottom]
|
||||
BorderSpacing.OnChange = nil
|
||||
BorderSpacing.InnerBorder = 2
|
||||
Caption = 'Cancel'
|
||||
ModalResult = 2
|
||||
TabOrder = 3
|
||||
@ -78,6 +86,8 @@ object MaskEditorForm: TMaskEditorForm
|
||||
end
|
||||
object HelpButton: TButton
|
||||
Anchors = [akRight, akBottom]
|
||||
BorderSpacing.OnChange = nil
|
||||
BorderSpacing.InnerBorder = 2
|
||||
Caption = '&Help'
|
||||
TabOrder = 4
|
||||
Left = 423
|
||||
@ -87,6 +97,8 @@ object MaskEditorForm: TMaskEditorForm
|
||||
end
|
||||
object LoadSampleMasksButton: TButton
|
||||
Anchors = [akLeft, akBottom]
|
||||
BorderSpacing.OnChange = nil
|
||||
BorderSpacing.InnerBorder = 2
|
||||
Caption = '&Masks...'
|
||||
OnClick = LoadSampleMasksButtonClick
|
||||
TabOrder = 5
|
||||
@ -97,6 +109,7 @@ object MaskEditorForm: TMaskEditorForm
|
||||
end
|
||||
object CharactersForBlanksEdit: TEdit
|
||||
Anchors = [akTop, akLeft, akRight]
|
||||
BorderSpacing.OnChange = nil
|
||||
BorderSpacing.Left = 3
|
||||
MaxLength = 1
|
||||
OnChange = CharactersForBlankEditChange
|
||||
@ -104,22 +117,24 @@ object MaskEditorForm: TMaskEditorForm
|
||||
AnchorSideLeft.Control = CharactersForBlanksLabel
|
||||
AnchorSideRight.Control = InputMaskEdit
|
||||
AnchorSideRight.Side = asrBottom
|
||||
Left = 129
|
||||
Left = 113
|
||||
Height = 23
|
||||
Top = 56
|
||||
Width = 71
|
||||
Width = 87
|
||||
end
|
||||
object SaveLiteralCheckBox: TCheckBox
|
||||
BorderSpacing.OnChange = nil
|
||||
Caption = 'Save &Literal Characters'
|
||||
OnClick = SaveLiteralCheckBoxClick
|
||||
TabOrder = 7
|
||||
UseOnChange = True
|
||||
Left = 8
|
||||
Height = 23
|
||||
Height = 13
|
||||
Top = 88
|
||||
Width = 194
|
||||
Width = 138
|
||||
end
|
||||
object TestInputPanel: TPanel
|
||||
BorderSpacing.OnChange = nil
|
||||
BevelInner = bvRaised
|
||||
BevelOuter = bvLowered
|
||||
ClientHeight = 66
|
||||
@ -131,6 +146,7 @@ object MaskEditorForm: TMaskEditorForm
|
||||
Top = 118
|
||||
Width = 192
|
||||
object TestInputLabel: TLabel
|
||||
BorderSpacing.OnChange = nil
|
||||
Caption = '&Test Input:'
|
||||
Color = clNone
|
||||
Left = 8
|
||||
@ -139,6 +155,7 @@ object MaskEditorForm: TMaskEditorForm
|
||||
Width = 65
|
||||
end
|
||||
object TestMaskEdit: TMaskEdit
|
||||
BorderSpacing.OnChange = nil
|
||||
TabOrder = 0
|
||||
Left = 8
|
||||
Height = 23
|
||||
@ -148,11 +165,11 @@ object MaskEditorForm: TMaskEditorForm
|
||||
end
|
||||
object OpenDialog1: TOpenDialog
|
||||
Options = [ofNoChangeDir, ofEnableSizing, ofViewDetail]
|
||||
Title = 'Îòêðûòü ñóùåñòâóþùèé ôàéë'
|
||||
Title = 'Open mask file (*.dem)'
|
||||
DefaultExt = '.dem'
|
||||
Filter = 'Edit Masks (*.dem)|*.dem|All Files (*.*)|*.*'
|
||||
FilterIndex = 0
|
||||
Title = 'Îòêðûòü ñóùåñòâóþùèé ôàéë'
|
||||
Title = 'Open mask file (*.dem)'
|
||||
left = 48
|
||||
top = 240
|
||||
end
|
||||
|
||||
@ -3,50 +3,55 @@
|
||||
LazarusResources.Add('TMaskEditorForm','FORMDATA',[
|
||||
'TPF0'#15'TMaskEditorForm'#14'MaskEditorForm'#11'BorderStyle'#7#8'bsDialog'#7
|
||||
+'Caption'#6#17'Input Mask Editor'#12'ClientHeight'#3#239#0#11'ClientWidth'#3
|
||||
+#251#1#8'OnCreate'#7#20'MaskEditorFormCreate'#13'PixelsPerInch'#2'p'#8'Posit'
|
||||
+#251#1#8'OnCreate'#7#20'MaskEditorFormCreate'#13'PixelsPerInch'#2'`'#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'#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
|
||||
+#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#13#3'Top'#2#8#5'Width'#2'@'#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#13#3'Top'#2#5#5'Width'
|
||||
+#2'M'#0#0#6'TLabel'#24'CharactersForBlanksLabel'#22'BorderSpacing.OnChange'
|
||||
+#13#7'Caption'#6#21'Character for Blanks:'#5'Color'#7#6'clNone'#12'FocusCont'
|
||||
+'rol'#7#23'CharactersForBlanksEdit'#4'Left'#2#8#6'Height'#2#13#3'Top'#2'>'#5
|
||||
+'Width'#2'f'#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#4'Left'#3
|
||||
+#208#0#6'Height'#3#174#0#3'Top'#2#24#5'Width'#3#31#1#0#0#7'TButton'#8'OkButt'
|
||||
+'on'#7'Anchors'#11#7'akRight'#8'akBottom'#0#22'BorderSpacing.OnChange'#13#25
|
||||
+'BorderSpacing.InnerBorder'#2#2#7'Caption'#6#2'OK'#11'ModalResult'#2#1#8'Tab'
|
||||
+'Order'#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#22'BorderS'
|
||||
+'pacing.OnChange'#13#25'BorderSpacing.InnerBorder'#2#2#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#25'BorderSpacing.InnerBorder'#2#2
|
||||
+#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#22'BorderSpacing.OnChange'#13#25'BorderSpacing.Inne'
|
||||
+'rBorder'#2#2#7'Caption'#6#9'&Masks...'#7'OnClick'#7#26'LoadSampleMasksButto'
|
||||
+'nClick'#8'TabOrder'#2#5#4'Left'#2#16#6'Height'#2#25#3'Top'#3#206#0#5'Width'
|
||||
+#2'K'#0#0#5'TEdit'#23'CharactersForBlanksEdit'#7'Anchors'#11#5'akTop'#6'akLe'
|
||||
+'ft'#7'akRight'#0#22'BorderSpacing.OnChange'#13#18'BorderSpacing.Left'#2#3#9
|
||||
+'MaxLength'#2#1#8'OnChange'#7#28'CharactersForBlankEditChange'#8'TabOrder'#2
|
||||
+#6#22'AnchorSideLeft.Control'#7#24'CharactersForBlanksLabel'#23'AnchorSideRi'
|
||||
+'ght.Control'#7#13'InputMaskEdit'#20'AnchorSideRight.Side'#7#9'asrBottom'#4
|
||||
+'Left'#2'q'#6'Height'#2#23#3'Top'#2'8'#5'Width'#2'W'#0#0#9'TCheckBox'#19'Sav'
|
||||
+'eLiteralCheckBox'#22'BorderSpacing.OnChange'#13#7'Caption'#6#24'Save &Liter'
|
||||
+'al Characters'#7'OnClick'#7#24'SaveLiteralCheckBoxClick'#8'TabOrder'#2#7#11
|
||||
+'UseOnChange'#9#4'Left'#2#8#6'Height'#2#13#3'Top'#2'X'#5'Width'#3#138#0#0#0#6
|
||||
+'TPanel'#14'TestInputPanel'#22'BorderSpacing.OnChange'#13#10'BevelInner'#7#8
|
||||
+'bvRaised'#10'BevelOuter'#7#9'bvLowered'#12'ClientHeight'#2'B'#11'ClientWidt'
|
||||
+'h'#3#192#0#11'FullRepaint'#8#8'TabOrder'#2#8#4'Left'#2#8#6'Height'#2'B'#3'T'
|
||||
+'op'#2'v'#5'Width'#3#192#0#0#6'TLabel'#14'TestInputLabel'#22'BorderSpacing.O'
|
||||
+'nChange'#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'TOpenDialog'#11'OpenDialog1'#7'Options'#11#13
|
||||
+'ofNoChangeDir'#14'ofEnableSizing'#12'ofViewDetail'#0#5'Title'#6#22'Open mas'
|
||||
+'k file (*.dem)'#10'DefaultExt'#6#4'.dem'#6'Filter'#6',Edit Masks (*.dem)|*.'
|
||||
+'dem|All Files (*.*)|*.*'#11'FilterIndex'#2#0#5'Title'#6#22'Open mask file ('
|
||||
+'*.dem)'#4'left'#2'0'#3'top'#3#240#0#0#0#0
|
||||
]);
|
||||
|
||||
@ -122,6 +122,7 @@ resourcestring
|
||||
oisSampleMasks = 'Sample Masks:';
|
||||
oisCharactersForBlanks = 'Characters for Blanks';
|
||||
oisTestInput = 'Test Input';
|
||||
oisOpenMaskFile = 'Open masks file (*.dem)';
|
||||
cActionListEditorDialogCategory = 'Dialog';
|
||||
cActionListEditorFileCategory = 'File';
|
||||
cActionListEditorDatabaseCategory = 'Database';
|
||||
|
||||
@ -139,10 +139,6 @@ type
|
||||
|
||||
PHKEY = ^HKEY;
|
||||
|
||||
// from Delphis sysutils.pas
|
||||
PByteArray = ^TByteArray;
|
||||
TByteArray = array[0..32767] of Byte;
|
||||
|
||||
var
|
||||
hInstance: HINST;
|
||||
|
||||
|
||||
Loading…
Reference in New Issue
Block a user