object MaskEditorForm: TMaskEditorForm Left = 458 Height = 287 Top = 248 Width = 507 ActiveControl = InputMaskEdit AutoSize = True BorderStyle = bsDialog Caption = 'Input Mask Editor' ClientHeight = 287 ClientWidth = 507 OnCreate = MaskEditorFormCreate Position = poScreenCenter LCLVersion = '0.9.27' object InputMaskLabel: TLabel AnchorSideLeft.Control = Owner AnchorSideTop.Control = Owner Left = 6 Height = 18 Top = 6 Width = 87 BorderSpacing.Left = 6 BorderSpacing.Top = 6 Caption = '&Input Mask:' FocusControl = InputMaskEdit ParentColor = False end object SampleMasksLabel: TLabel AnchorSideLeft.Control = SampleMasksListBox AnchorSideTop.Control = Owner Left = 201 Height = 18 Top = 6 Width = 110 BorderSpacing.Top = 6 Caption = '&Sample Masks:' ParentColor = False end object CharactersForBlanksLabel: TLabel AnchorSideLeft.Control = Owner AnchorSideTop.Control = InputMaskEdit AnchorSideTop.Side = asrBottom Left = 6 Height = 18 Top = 56 Width = 138 BorderSpacing.Left = 6 BorderSpacing.Top = 6 Caption = 'Character for Blanks:' FocusControl = CharactersForBlanksEdit ParentColor = False end object InputMaskEdit: TEdit AnchorSideLeft.Control = Owner AnchorSideTop.Control = InputMaskLabel AnchorSideTop.Side = asrBottom Left = 6 Height = 23 Top = 27 Width = 189 BorderSpacing.Left = 6 BorderSpacing.Top = 3 OnChange = InputMaskEditChange TabOrder = 0 end object SampleMasksListBox: TListBox AnchorSideLeft.Control = InputMaskEdit AnchorSideLeft.Side = asrBottom AnchorSideTop.Control = SampleMasksLabel AnchorSideTop.Side = asrBottom AnchorSideRight.Control = Owner AnchorSideRight.Side = asrBottom AnchorSideBottom.Control = LoadSampleMasksButton AnchorSideBottom.Side = asrBottom Left = 201 Height = 204 Top = 27 Width = 300 Anchors = [akTop, akLeft, akRight, akBottom] BorderSpacing.Left = 6 BorderSpacing.Top = 3 BorderSpacing.Right = 6 ItemHeight = 0 OnClick = SampleMasksListBoxClick OnDrawItem = SampleMasksListBoxDrawItem Style = lbOwnerDrawFixed TabOrder = 4 TopIndex = -1 end object LoadSampleMasksButton: TButton AnchorSideLeft.Control = Owner AnchorSideTop.Control = TestInputPanel AnchorSideTop.Side = asrBottom Left = 6 Height = 25 Top = 206 Width = 75 BorderSpacing.Around = 6 Caption = '&Masks...' OnClick = LoadSampleMasksButtonClick TabOrder = 5 end object CharactersForBlanksEdit: TEdit AnchorSideLeft.Control = Owner AnchorSideTop.Control = CharactersForBlanksLabel AnchorSideTop.Side = asrBottom AnchorSideRight.Control = InputMaskEdit AnchorSideRight.Side = asrBottom Left = 6 Height = 23 Top = 77 Width = 189 Anchors = [akTop, akLeft, akRight] BorderSpacing.Left = 6 BorderSpacing.Top = 3 MaxLength = 1 OnChange = CharactersForBlankEditChange TabOrder = 1 end object SaveLiteralCheckBox: TCheckBox AnchorSideLeft.Control = Owner AnchorSideTop.Control = CharactersForBlanksEdit AnchorSideTop.Side = asrBottom Left = 6 Height = 22 Top = 106 Width = 175 BorderSpacing.Left = 6 BorderSpacing.Top = 6 Caption = 'Save &Literal Characters' OnClick = SaveLiteralCheckBoxClick TabOrder = 2 end object TestInputPanel: TPanel AnchorSideLeft.Control = Owner AnchorSideTop.Control = SaveLiteralCheckBox AnchorSideTop.Side = asrBottom AnchorSideRight.Control = InputMaskEdit AnchorSideRight.Side = asrBottom Left = 6 Height = 66 Top = 134 Width = 189 Anchors = [akTop, akLeft, akRight] BorderSpacing.Left = 6 BorderSpacing.Top = 6 BevelInner = bvRaised BevelOuter = bvLowered ClientHeight = 66 ClientWidth = 189 FullRepaint = False TabOrder = 3 object TestInputLabel: TLabel AnchorSideLeft.Control = TestInputPanel AnchorSideTop.Control = TestInputPanel Left = 6 Height = 14 Top = 6 Width = 55 BorderSpacing.Left = 6 BorderSpacing.Top = 6 Caption = '&Test Input:' ParentColor = False end object TestMaskEdit: TMaskEdit AnchorSideLeft.Control = TestInputPanel AnchorSideTop.Control = TestInputLabel AnchorSideTop.Side = asrBottom AnchorSideRight.Control = TestInputPanel AnchorSideRight.Side = asrBottom Left = 6 Height = 23 Top = 23 Width = 177 Anchors = [akTop, akLeft, akRight] BorderSpacing.Left = 6 BorderSpacing.Top = 3 BorderSpacing.Right = 6 TabOrder = 0 SpaceChar = '_' end end object ButtonPanel1: TButtonPanel AnchorSideTop.Control = LoadSampleMasksButton AnchorSideTop.Side = asrBottom Left = 6 Height = 44 Top = 237 Width = 495 Anchors = [akTop, akLeft, akRight, akBottom] TabOrder = 6 ShowButtons = [pbOK, pbCancel, pbHelp] end object OpenDialog1: TOpenDialog Title = 'Open mask file (*.dem)' DefaultExt = '.dem' Filter = 'Edit Masks (*.dem)|*.dem|All Files (*.*)|*.*' FilterIndex = 0 Options = [ofNoChangeDir, ofEnableSizing, ofViewDetail] left = 152 top = 96 end end