datadict.dfm

这是一款ERP软件源代码

        Left = 42
        Top = 48
        Width = 48
        Height = 12
        Caption = '引用表：'
      end
      object Label14: TLabel
        Left = 41
        Top = 74
        Width = 60
        Height = 12
        Caption = '引用字段：'
      end
      object Label6: TLabel
        Left = 41
        Top = 128
        Width = 60
        Height = 12
        Caption = '编号方式：'
      end
      object scFieldReferTable: TSDComboBox
        Left = 106
        Top = 41
        Width = 145
        Height = 20
        Color = 16118752
        Ctl3D = False
        ItemHeight = 12
        ParentCtl3D = False
        TabOrder = 1
        OnExit = scFieldReferTableExit
        ReadOnly = True
      end
      object scFieldReferField: TSDComboBox
        Left = 108
        Top = 68
        Width = 146
        Height = 20
        Color = 16118752
        Ctl3D = False
        ItemHeight = 12
        ParentCtl3D = False
        TabOrder = 2
      end
      object chkFieldForeignKey: TCheckBox
        Left = 21
        Top = 21
        Width = 58
        Height = 13
        Caption = '是外键'
        TabOrder = 0
        OnClick = chkFieldForeignKeyClick
      end
      object chkFieldAutoNo: TCheckBox
        Left = 21
        Top = 98
        Width = 74
        Height = 17
        Caption = '自动编号'
        TabOrder = 3
        OnClick = chkFieldAutoNoClick
      end
      object scFieldNumbering: TSDComboBox
        Left = 109
        Top = 120
        Width = 146
        Height = 20
        Style = csDropDownList
        Color = 16118752
        Ctl3D = False
        ItemHeight = 12
        ParentCtl3D = False
        TabOrder = 4
        KeyItem = cbItem2
      end
    end
  end
  object sgDataDict: TSDGrid [1]
    Left = 0
    Top = 154
    Width = 739
    Height = 325
    Align = alClient
    Color = 16118752
    ColCount = 10
    Ctl3D = False
    DefaultRowHeight = 18
    FixedColor = 8564917
    RowCount = 10
    Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goRowSizing, goColSizing, goRowSelect]
    ParentCtl3D = False
    TabOrder = 3
    OnDblClick = sgDataDictDblClick
    OnSelectCell = sgDataDictSelectCell
    Columns = <
      item
        ColumnFont.Charset = DEFAULT_CHARSET
        ColumnFont.Color = clWindowText
        ColumnFont.Height = -13
        ColumnFont.Name = 'MS Sans Serif'
        ColumnFont.Style = []
        ColumnWidth = 0
      end
      item
        ColumnFont.Charset = GB2312_CHARSET
        ColumnFont.Color = clWindowText
        ColumnFont.Height = -12
        ColumnFont.Name = '宋体'
        ColumnFont.Style = []
        TitleString = '序号'
        ColumnWidth = 0
      end
      item
        ColumnFont.Charset = GB2312_CHARSET
        ColumnFont.Color = clWindowText
        ColumnFont.Height = -12
        ColumnFont.Name = '宋体'
        ColumnFont.Style = []
        TitleString = '字段名'
        ColumnWidth = 0
      end
      item
        ColumnFont.Charset = GB2312_CHARSET
        ColumnFont.Color = clWindowText
        ColumnFont.Height = -12
        ColumnFont.Name = '宋体'
        ColumnFont.Style = []
        TitleString = '说明'
        ColumnWidth = 0
      end
      item
        ColumnFont.Charset = GB2312_CHARSET
        ColumnFont.Color = clWindowText
        ColumnFont.Height = -12
        ColumnFont.Name = '宋体'
        ColumnFont.Style = []
        TitleString = '类型'
        ColumnWidth = 0
      end
      item
        ColumnFont.Charset = GB2312_CHARSET
        ColumnFont.Color = clWindowText
        ColumnFont.Height = -12
        ColumnFont.Name = '宋体'
        ColumnFont.Style = []
        TitleString = '宽度'
        ColumnWidth = 0
      end
      item
        ColumnFont.Charset = GB2312_CHARSET
        ColumnFont.Color = clWindowText
        ColumnFont.Height = -12
        ColumnFont.Name = '宋体'
        ColumnFont.Style = []
        TitleString = '小数位'
        ColumnWidth = 0
      end
      item
        ColumnFont.Charset = GB2312_CHARSET
        ColumnFont.Color = clWindowText
        ColumnFont.Height = -12
        ColumnFont.Name = '宋体'
        ColumnFont.Style = []
        TitleString = '主键'
        ColumnWidth = 0
      end
      item
        ColumnFont.Charset = GB2312_CHARSET
        ColumnFont.Color = clWindowText
        ColumnFont.Height = -12
        ColumnFont.Name = '宋体'
        ColumnFont.Style = []
        TitleString = '引用表'
        ColumnWidth = 0
      end
      item
        ColumnFont.Charset = GB2312_CHARSET
        ColumnFont.Color = clWindowText
        ColumnFont.Height = -12
        ColumnFont.Name = '宋体'
        ColumnFont.Style = []
        TitleString = '引用字段'
        ColumnWidth = 0
      end>
    ColWidths = (
      10
      34
      133
      123
      49
      49
      53
      42
      97
      99)
  end
  inherited sbBar: TStatusBar
    Width = 739
  end
  inherited CoolBar1: TCoolBar
    Width = 739
    Bands = <
      item
        Control = tbMainBar
        ImageIndex = -1
        MinHeight = 35
        Width = 739
      end>
    inherited tbMainBar: TToolBar
      Width = 726
    end
  end
  object FloatPanel1: TFloatPanel [4]
    Left = 0
    Top = 39
    Width = 739
    Height = 115
    Align = alTop
    Color = 16118752
    Caption = 'FloatPanel1'
    ParentColor = False
    TabOrder = 2
    object Label1: TLabel
      Left = 27
      Top = 18
      Width = 60
      Height = 12
      Caption = '数据表名：'
    end
    object Label2: TLabel
      Left = 305
      Top = 17
      Width = 48
      Height = 12
      Caption = '表说明：'
    end
    object Label3: TLabel
      Left = 25
      Top = 49
      Width = 60
      Height = 12
      Caption = '所属模块：'
    end
    object Label5: TLabel
      Left = 305
      Top = 80
      Width = 60
      Height = 12
      Caption = '修改日期：'
    end
    object Label4: TLabel
      Left = 305
      Top = 50
      Width = 60
      Height = 12
      Caption = '模块代码：'
    end
    object seTableName: TSDEdit
      Left = 97
      Top = 13
      Width = 151
      Height = 18
      Ctl3D = False
      ParentColor = True
      ParentCtl3D = False
      TabOrder = 0
      OnKeyDown = seTableNameKeyDown
      SplitSymbol = ' | '
    end
    object seTableDesc: TSDEdit
      Left = 369
      Top = 14
      Width = 241
      Height = 18
      Ctl3D = False
      ParentColor = True
      ParentCtl3D = False
      TabOrder = 1
      SplitSymbol = ' | '
    end
    object chkTableSysFlg: TCheckBox
      Left = 27
      Top = 80
      Width = 70
      Height = 14
      Caption = '是系统表'
      TabOrder = 3
    end
    object scTableType: TSDComboBox
      Left = 96
      Top = 42
      Width = 153
      Height = 20
      Color = 16118752
      Ctl3D = False
      ItemHeight = 12
      ParentCtl3D = False
      TabOrder = 2
      OnClick = scTableTypeClick
      KeyItem = cbItem2
    end
    object seTableMDate: TSDEdit
      Left = 369
      Top = 76
      Width = 127
      Height = 18
      Ctl3D = False
      Enabled = False
      ParentColor = True
      ParentCtl3D = False
      TabOrder = 4
      SplitSymbol = ' | '
    end
    object seTableClassId: TSDEdit
      Left = 369
      Top = 47
      Width = 130
      Height = 18
      Ctl3D = False
      ParentColor = True
      ParentCtl3D = False
      ReadOnly = True
      TabOrder = 5
      SplitSymbol = ' | '
    end
  end
  inherited MainMenu1: TMainMenu
    Left = 704
    Top = 48
  end
  inherited ImageList1: TImageList
    Left = 457
    Top = 246
  end
end