DOS/V Power Report 1997 August/VPR9708A.ISO/D3TRIAL/INSTALL/DATA.Z/DCLSTD30.DPL/0/RCDATA/TMASKFORM/TMASKFORM.txt

Text File | 1997-05-14 | 3KB | 163 lines

object MaskForm: TMaskForm
  Left = 245
  Top = 153
  ActiveControl = InputMask
  BorderStyle = bsDialog
  Caption = 'ｿｽｿｽｿｽｿｽﾏｽｿｽｿｽﾌ設抵ｿｽ'
  ClientHeight = 211
  ClientWidth = 488
  ParentFont = True
  Position = poScreenCenter
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 12
  object Bevel1: TBevel
    Left = 8
    Top = 124
    Width = 193
    Height = 50
    Shape = bsFrame
  end
  object Label1: TLabel
    Left = 8
    Top = 8
    Width = 56
    Height = 13
    Caption = 'ｿｽｿｽｿｽｿｽﾏｽｿｽ(&I):'
    FocusControl = InputMask
    IsControl = True
  end
  object Label2: TLabel
    Left = 208
    Top = 8
    Width = 72
    Height = 13
    Caption = 'ｿｽｿｽ(&S):'
    FocusControl = ListBox1
    IsControl = True
  end
  object Label3: TLabel
    Left = 12
    Top = 128
    Width = 51
    Height = 13
    Caption = 'ﾃｽｿｽ(&T):'
    FocusControl = TestEdit
    IsControl = True
  end
  object Label4: TLabel
    Left = 24
    Top = 60
    Width = 99
    Height = 13
    Caption = 'ｿｽ瀦ｿｽｿｽｿｽｿｽﾌ指ｿｽｿｽ(&B):'
    FocusControl = Blanks
    IsControl = True
  end
  object InputMask: TEdit
    Left = 8
    Top = 24
    Width = 192
    Height = 21
    TabOrder = 0
    Text = 'InputMask'
    OnChange = InputMaskChange
    IsControl = True
  end
  object ListBox1: TListBox
    Left = 208
    Top = 24
    Width = 268
    Height = 149
    ItemHeight = 16
    Items.Strings = (
      'Phone | 0353508393 | !099999-0999-0000;1;_'
      'Zip Code | 15100 | 000\-99;1;_'
      'New Zip Code | 1510073 | 000\-0000;1;_'
      'Date | 062794 | !99/99/00;1;_'
      'Time | 090515PM | !90:00:00>LL;1;_')
    Style = lbOwnerDrawFixed
    TabOrder = 4
    OnClick = ListBoxSelect
    OnDrawItem = ListDrawItem
    IsControl = True
  end
  object TestEdit: TMaskEdit
    Left = 12
    Top = 148
    Width = 185
    Height = 21
    MaxLength = 0
    TabOrder = 3
    IsControl = True
  end
  object Blanks: TEdit
    Left = 152
    Top = 56
    Width = 33
    Height = 21
    MaxLength = 1
    TabOrder = 1
    Text = '_'
    OnChange = BlanksChange
    IsControl = True
  end
  object SaveMaskCheck: TCheckBox
    Left = 8
    Top = 84
    Width = 177
    Height = 20
    Caption = 'ｿｽｿｽｿｽｿｽｿｽｿｽﾆゑｿｽｿｽﾄ保托ｿｽ(&L)'
    TabOrder = 2
    OnClick = BlanksChange
    IsControl = True
  end
  object Masks: TButton
    Left = 16
    Top = 181
    Width = 75
    Height = 25
    Caption = 'ﾏｽｿｽ(&M)...'
    TabOrder = 5
    OnClick = MasksClick
  end
  object OKButton: TButton
    Left = 241
    Top = 181
    Width = 75
    Height = 25
    Caption = 'OK'
    Default = True
    ModalResult = 1
    TabOrder = 6
  end
  object CancelButton: TButton
    Left = 321
    Top = 181
    Width = 75
    Height = 25
    Cancel = True
    Caption = 'ｿｽｿｽﾝｾｿｽ'
    ModalResult = 2
    TabOrder = 7
  end
  object HelpButton: TButton
    Left = 401
    Top = 181
    Width = 75
    Height = 25
    Caption = 'ｿｽｿｽｿｽｿｽ(&H)'
    TabOrder = 8
    OnClick = HelpButtonClick
  end
  object OpenDialog1: TOpenDialog
    DefaultExt = 'dem'
    FileEditStyle = fsEdit
    Filter = 'ﾏｽｿｽ ﾌｧｿｽｿｽ (*.dem)|*.dem|ｿｽｿｽｿｽﾗてゑｿｽﾌｧｿｽｿｽ (*.*)|*.*'
    Options = [ofHideReadOnly]
    Title = 'ﾏｽｿｽ ﾌｧｿｽﾙゑｿｽｿｽJｿｽｿｽ'
    Left = 112
    Top = 184
  end
end