lazarus/ideintf/maskpropedit.lfm

object MaskEditorForm: TMaskEditorForm
  BorderStyle = bsDialog
  Caption = 'Input Mask Editor'
  ClientHeight = 239
  ClientWidth = 507
  OnCreate = MaskEditorFormCreate
  PixelsPerInch = 96
  Position = poDesktopCenter
  HorzScrollBar.Page = 506
  VertScrollBar.Page = 238
  Left = 458
  Height = 239
  Top = 248
  Width = 507
  object InputMaskLabel: TLabel
    BorderSpacing.OnChange = nil
    Caption = '&Input Mask:'
    Color = clNone
    FocusControl = InputMaskEdit
    Left = 8
    Height = 13
    Top = 8
    Width = 64
  end
  object SampleMasksLabel: TLabel
    BorderSpacing.OnChange = nil
    Caption = '&Sample Masks:'
    Color = clNone
    Left = 208
    Height = 13
    Top = 5
    Width = 77
  end
  object CharactersForBlanksLabel: TLabel
    BorderSpacing.OnChange = nil
    Caption = 'Character for Blanks:'
    Color = clNone
    FocusControl = CharactersForBlanksEdit
    Left = 8
    Height = 13
    Top = 62
    Width = 102
  end
  object InputMaskEdit: TEdit
    BorderSpacing.OnChange = nil
    OnChange = InputMaskEditChange
    TabOrder = 0
    Left = 8
    Height = 23
    Top = 24
    Width = 192
  end
  object SampleMasksListBox: TListBox
    Anchors = [akTop, akLeft, akRight, akBottom]
    BorderSpacing.OnChange = nil
    OnClick = SampleMasksListBoxClick
    TabOrder = 1
    Left = 208
    Height = 174
    Top = 24
    Width = 287
  end
  object OkButton: TButton
    Anchors = [akRight, akBottom]
    BorderSpacing.OnChange = nil
    
    Caption = 'OK'
    ModalResult = 1
    TabOrder = 2
    Left = 263
    Height = 25
    Top = 206
    Width = 75
  end
  object CancelButton: TButton
    Anchors = [akRight, akBottom]
    BorderSpacing.OnChange = nil
    
    Caption = 'Cancel'
    ModalResult = 2
    TabOrder = 3
    Left = 343
    Height = 25
    Top = 206
    Width = 75
  end
  object HelpButton: TButton
    Anchors = [akRight, akBottom]
    BorderSpacing.OnChange = nil
    
    Caption = '&Help'
    TabOrder = 4
    Left = 423
    Height = 25
    Top = 206
    Width = 75
  end
  object LoadSampleMasksButton: TButton
    Anchors = [akLeft, akBottom]
    BorderSpacing.OnChange = nil
    
    Caption = '&Masks...'
    OnClick = LoadSampleMasksButtonClick
    TabOrder = 5
    Left = 16
    Height = 25
    Top = 206
    Width = 75
  end
  object CharactersForBlanksEdit: TEdit
    Anchors = [akTop, akLeft, akRight]
    BorderSpacing.OnChange = nil
    BorderSpacing.Left = 3
    MaxLength = 1
    OnChange = CharactersForBlankEditChange
    TabOrder = 6
    AnchorSideLeft.Control = CharactersForBlanksLabel
    AnchorSideRight.Control = InputMaskEdit
    AnchorSideRight.Side = asrBottom
    Left = 113
    Height = 23
    Top = 56
    Width = 87
  end
  object SaveLiteralCheckBox: TCheckBox
    BorderSpacing.OnChange = nil
    Caption = 'Save &Literal Characters'
    OnClick = SaveLiteralCheckBoxClick
    TabOrder = 7
    UseOnChange = True
    Left = 8
    Height = 13
    Top = 88
    Width = 138
  end
  object TestInputPanel: TPanel
    BorderSpacing.OnChange = nil
    BevelInner = bvRaised
    BevelOuter = bvLowered
    ClientHeight = 66
    ClientWidth = 192
    FullRepaint = False
    TabOrder = 8
    Left = 8
    Height = 66
    Top = 118
    Width = 192
    object TestInputLabel: TLabel
      BorderSpacing.OnChange = nil
      Caption = '&Test Input:'
      Color = clNone
      Left = 8
      Height = 17
      Top = 6
      Width = 65
    end
    object TestMaskEdit: TMaskEdit
      BorderSpacing.OnChange = nil
      TabOrder = 0
      Left = 8
      Height = 23
      Top = 26
      Width = 176
    end
  end
  object OpenDialog1: TOpenDialog
    Options = [ofNoChangeDir, ofEnableSizing, ofViewDetail]
    Title = 'Open mask file (*.dem)'
    DefaultExt = '.dem'
    Filter = 'Edit Masks (*.dem)|*.dem|All Files (*.*)|*.*'
    FilterIndex = 0
    Title = 'Open mask file (*.dem)'
    left = 48
    top = 240
  end
end