newtablefrm.dfm

delphi本地数据库引擎

object NewTableForm: TNewTableForm
  Left = 199
  Top = 117
  BorderStyle = bsDialog
  Caption = '新建表'
  ClientHeight = 383
  ClientWidth = 495
  Color = clBtnFace
  Font.Charset = GB2312_CHARSET
  Font.Color = clWindowText
  Font.Height = -12
  Font.Name = '宋体'
  Font.Style = []
  OldCreateOrder = False
  Position = poScreenCenter
  OnCreate = FormCreate
  OnDestroy = FormDestroy
  PixelsPerInch = 96
  TextHeight = 12
  object TableNameLabel: TLabel
    Left = 12
    Top = 13
    Width = 24
    Height = 12
    Caption = '表名'
  end
  object TableNameEdit: TEdit
    Left = 45
    Top = 9
    Width = 440
    Height = 20
    MaxLength = 32
    TabOrder = 0
  end
  object FieldGroupBox: TGroupBox
    Left = 8
    Top = 37
    Width = 479
    Height = 176
    Caption = '字段'
    TabOrder = 1
    object FieldListView: TListView
      Left = 13
      Top = 20
      Width = 368
      Height = 141
      Columns = <
        item
          Caption = '序号'
        end
        item
          Caption = '字段名'
          Width = 120
        end
        item
          Caption = '类型'
          Width = 80
        end
        item
          Caption = '大小'
          Width = 80
        end
        item
          Caption = '数据处理'
          Width = 90
        end
        item
          Caption = '说明'
          Width = 1000
        end>
      HideSelection = False
      ReadOnly = True
      RowSelect = True
      SmallImages = ImageList
      TabOrder = 0
      ViewStyle = vsReport
      OnDblClick = FieldListViewDblClick
    end
    object AddFieldButton: TButton
      Left = 391
      Top = 20
      Width = 75
      Height = 25
      Caption = '添加'
      TabOrder = 1
      OnClick = AddFieldButtonClick
    end
    object DeleteFieldButton: TButton
      Left = 391
      Top = 50
      Width = 75
      Height = 25
      Caption = '删除'
      TabOrder = 2
      OnClick = DeleteFieldButtonClick
    end
    object MoveDownFieldButton: TButton
      Left = 392
      Top = 135
      Width = 75
      Height = 25
      Caption = '下移'
      TabOrder = 4
      OnClick = MoveDownFieldButtonClick
    end
    object MoveUpFieldButton: TButton
      Left = 392
      Top = 105
      Width = 75
      Height = 25
      Caption = '上移'
      TabOrder = 3
      OnClick = MoveUpFieldButtonClick
    end
  end
  object IndexGroupBox: TGroupBox
    Left = 8
    Top = 219
    Width = 479
    Height = 121
    Caption = '索引'
    TabOrder = 2
    object IndexListView: TListView
      Left = 13
      Top = 20
      Width = 368
      Height = 88
      Columns = <
        item
          Caption = '序号'
        end
        item
          Caption = '索引名'
          Width = 120
        end
        item
          Caption = '索引字段'
          Width = 120
        end
        item
          Alignment = taCenter
          Caption = '主索引'
        end
        item
          Alignment = taCenter
          Caption = '唯一性'
        end
        item
          Alignment = taCenter
          Caption = '区分大小写'
          Width = 80
        end
        item
          Alignment = taCenter
          Caption = '排序方式'
          Width = 80
        end>
      HideSelection = False
      ReadOnly = True
      RowSelect = True
      SmallImages = ImageList
      TabOrder = 0
      ViewStyle = vsReport
      OnDblClick = IndexListViewDblClick
    end
    object AddIndexButton: TButton
      Left = 391
      Top = 20
      Width = 75
      Height = 25
      Caption = '添加'
      TabOrder = 1
      OnClick = AddIndexButtonClick
    end
    object DeleteIndexButton: TButton
      Left = 391
      Top = 52
      Width = 75
      Height = 25
      Caption = '删除'
      TabOrder = 2
      OnClick = DeleteIndexButtonClick
    end
    object ClearIndexButton: TButton
      Left = 391
      Top = 83
      Width = 75
      Height = 25
      Caption = '清空'
      TabOrder = 3
      OnClick = ClearIndexButtonClick
    end
  end
  object CreateTableButton: TButton
    Left = 301
    Top = 349
    Width = 87
    Height = 25
    Caption = '生成表'
    TabOrder = 3
    OnClick = CreateTableButtonClick
  end
  object CancelButton: TButton
    Left = 399
    Top = 349
    Width = 87
    Height = 25
    Caption = '取消'
    TabOrder = 4
    OnClick = CancelButtonClick
  end
  object HelpButton: TButton
    Left = 9
    Top = 349
    Width = 87
    Height = 25
    Caption = '帮助'
    TabOrder = 5
    OnClick = HelpButtonClick