home *** CD-ROM | disk | FTP | other *** search
- object SCMaskEditorForm: TSCMaskEditorForm
- Left = 277
- Top = 255
- ActiveControl = InputMask
- BorderStyle = bsDialog
- Caption = 'Input Mask Editor'
- ClientHeight = 241
- ClientWidth = 490
- Color = clBtnFace
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- OldCreateOrder = False
- Position = poScreenCenter
- PixelsPerInch = 96
- TextHeight = 13
- object InputMaskLabel: TLabel
- Left = 8
- Top = 4
- Width = 117
- Height = 17
- AutoSize = False
- Caption = '&Input Mask:'
- FocusControl = InputMask
- Layout = tlBottom
- end
- object SampleLabel: TLabel
- Left = 212
- Top = 4
- Width = 117
- Height = 17
- AutoSize = False
- Caption = '&Sample Masks:'
- FocusControl = SampleMasks
- Layout = tlBottom
- end
- object BlankLabel: TLabel
- Left = 8
- Top = 52
- Width = 149
- Height = 17
- Alignment = taRightJustify
- AutoSize = False
- Caption = 'Character for &Blanks:'
- FocusControl = BlankEdit
- Layout = tlBottom
- end
- object TestLabel: TLabel
- Left = 8
- Top = 156
- Width = 117
- Height = 17
- AutoSize = False
- Caption = '&Test Input:'
- FocusControl = TestInput
- Layout = tlBottom
- end
- object TestInput: TSCMaskEdit
- Left = 8
- Top = 176
- Width = 193
- Height = 21
- EditMask = '000\-00\-0000;1;_'
- MaxLength = 11
- TabOrder = 3
- Text = '___-__-____'
- end
- object SampleMasks: TListView
- Left = 212
- Top = 24
- Width = 269
- Height = 173
- Columns = <
- item
- Caption = 'Description'
- Width = 124
- end
- item
- Caption = 'Sample'
- Width = 120
- end>
- ColumnClick = False
- HideSelection = False
- ReadOnly = True
- RowSelect = True
- ShowColumnHeaders = False
- TabOrder = 5
- ViewStyle = vsReport
- OnChange = SampleMasksChange
- end
- object BlankEdit: TSCEdit
- Left = 164
- Top = 52
- Width = 37
- Height = 21
- Alignment = taRightJustify
- MaxLength = 1
- TabOrder = 1
- Text = '_'
- OnChange = BlankEditChange
- end
- object SaveLiterals: TSCCheckbox
- Left = 8
- Top = 88
- Width = 144
- Height = 17
- State = sccbChecked
- Caption = 'Save &Literal Characters'
- Checked = True
- TabOrder = 2
- OnChange = SaveLiteralsChange
- end
- object InputMask: TSCEdit
- Left = 8
- Top = 24
- Width = 193
- Height = 21
- TabOrder = 0
- OnChange = InputMaskChange
- end
- object MasksButton: TSCButton
- Left = 112
- Top = 206
- Width = 89
- Height = 25
- Caption = '&Masks...'
- ShowFocus = False
- TabOrder = 4
- OnClick = MasksButtonClick
- end
- object OKButton: TSCButton
- Left = 313
- Top = 206
- Width = 81
- Height = 25
- Caption = 'OK'
- Default = True
- ModalResult = 1
- ShowFocus = False
- TabOrder = 6
- end
- object CancelButton: TSCButton
- Left = 400
- Top = 206
- Width = 81
- Height = 25
- Cancel = True
- Caption = 'Cancel'
- ModalResult = 2
- ShowFocus = False
- TabOrder = 7
- end
- object OpenMaskDialog: TOpenDialog
- DefaultExt = 'dem'
- Filter = 'Edit Masks (*.dem)|*.dem|All Files (*.*)|*.*'
- Options = [ofHideReadOnly, ofPathMustExist, ofFileMustExist, ofEnableSizing]
- Title = 'Open Mask File'
- Left = 172
- Top = 132
- end
- end
-