addfieldfrm.dfm

delphi本地数据库引擎

inherited AddFieldForm: TAddFieldForm
  BorderStyle = bsDialog
  Caption = '添加字段'
  ClientHeight = 228
  ClientWidth = 280
  Font.Charset = GB2312_CHARSET
  Font.Height = -12
  Font.Name = '宋体'
  OldCreateOrder = True
  Position = poScreenCenter
  OnCreate = FormCreate
  OnDestroy = FormDestroy
  PixelsPerInch = 96
  TextHeight = 12
  object GroupBox1: TGroupBox
    Left = 8
    Top = 4
    Width = 264
    Height = 179
    TabOrder = 0
    object FieldNameLabel: TLabel
      Left = 12
      Top = 24
      Width = 36
      Height = 12
      Caption = '字段名'
    end
    object FieldTypeLabel: TLabel
      Left = 12
      Top = 50
      Width = 24
      Height = 12
      Caption = '类型'
    end
    object FieldSizeLabel: TLabel
      Left = 12
      Top = 75
      Width = 24
      Height = 12
      Caption = '大小'
    end
    object DataProcessLabel: TLabel
      Left = 12
      Top = 150
      Width = 48
      Height = 12
      Caption = '数据处理'
    end
    object Bevel1: TBevel
      Left = 12
      Top = 136
      Width = 239
      Height = 7
      Shape = bsTopLine
    end
    object FieldNameEdit: TEdit
      Left = 76
      Top = 19
      Width = 175
      Height = 20
      TabOrder = 0
    end
    object DataSizeEdit: TEdit
      Left = 76
      Top = 71
      Width = 175
      Height = 20
      TabOrder = 2
    end
    object FieldTypeComboBox: TComboBox
      Left = 76
      Top = 45
      Width = 175
      Height = 20
      Style = csDropDownList
      DropDownCount = 17
      ItemHeight = 12
      TabOrder = 1
      OnClick = FieldTypeComboBoxClick
    end
    object Panel1: TPanel
      Left = 13
      Top = 97
      Width = 238
      Height = 31
      BevelOuter = bvLowered
      BorderWidth = 3
      Color = 14474460
      TabOrder = 4
      object CommentsLabel: TLabel
        Left = 4
        Top = 4
        Width = 230
        Height = 23
        Align = alClient
      end
    end
    object DPModeComboBox: TComboBox
      Left = 76
      Top = 145
      Width = 175
      Height = 20
      Style = csDropDownList
      ItemHeight = 12
      TabOrder = 3
      OnClick = FieldTypeComboBoxClick
      Items.Strings = (
        '缺省方式'
        '永远保持原状(不加密,不压缩)')
    end
  end
  object OkButton: TButton
    Left = 104
    Top = 193
    Width = 75
    Height = 25
    Caption = '添加'
    Default = True
    TabOrder = 1
    OnClick = OkButtonClick
  end
  object CloseButton: TButton
    Left = 196
    Top = 193
    Width = 75
    Height = 25
    Cancel = True
    Caption = '关闭'
    TabOrder = 2
    OnClick = CloseButtonClick
  end
end