unt_data.dfm

煤矿行业采掘接替计划自动生成系统

inherited Frm_data: TFrm_data
  OldCreateOrder = True
  Left = 6
  Top = 65523
  Height = 580
  Width = 808
  inherited ADOC_Mining: TADOConnection
    Mode = cmShareDenyNone
    Provider = 'SQLOLEDB.1'
    Left = 104
    Top = 4
  end
  object ADOPassword: TADOTable
    Tag = 1
    Connection = ADOC_Mining
    CursorType = ctStatic
    TableName = #29992#25143
    Left = 23
    Top = 4
  end
  object ADOT_Shaft: TADOTable
    Tag = 1
    Connection = ADOC_Mining
    CursorType = ctStatic
    TableName = #30719#20117
    Left = 178
    Top = 4
    object ADOT_ShaftShaft_Id: TSmallintField
      FieldName = 'Shaft_Id'
    end
    object ADOT_ShaftShaft_name: TWideStringField
      FieldName = 'Shaft_name'
      Size = 50
    end
    object ADOT_ShaftInd_Storage: TFloatField
      FieldName = 'Ind_Storage'
      DisplayFormat = '#.0000'
    end
    object ADOT_ShaftPro_Storage: TFloatField
      FieldName = 'Pro_Storage'
      DisplayFormat = '#.0000'
    end
    object ADOT_ShaftDiscripe: TMemoField
      FieldName = 'Discripe'
      BlobType = ftMemo
    end
  end
  object ADOT_Graph: TADOTable
    Tag = 1
    Connection = ADOC_Mining
    CursorType = ctStatic
    TableName = #22270#32440
    Left = 262
    Top = 4
  end
  object ADOT_line: TADOTable
    Tag = 1
    Connection = ADOC_Mining
    CursorType = ctStatic
    TableName = #30452#32447
    Left = 267
    Top = 495
  end
  object ADOT_Pline: TADOTable
    Tag = 1
    Connection = ADOC_Mining
    CursorType = ctStatic
    TableName = #22810#20041#32447
    Left = 336
    Top = 495
  end
  object ADOT_Spline: TADOTable
    Tag = 1
    Connection = ADOC_Mining
    CursorType = ctStatic
    TableName = #26679#26465#32447
    Left = 555
    Top = 495
  end
  object ADOT_Arc: TADOTable
    Tag = 1
    Connection = ADOC_Mining
    CursorType = ctStatic
    TableName = #24359
    Left = 178
    Top = 495
  end
  object ADOT_Circle: TADOTable
    Tag = 1
    Connection = ADOC_Mining
    CursorType = ctStatic
    TableName = #22278
    Left = 104
    Top = 495
  end
  object ADOT_Text: TADOTable
    Tag = 1
    Connection = ADOC_Mining
    CursorType = ctStatic
    TableName = #25991#26412
    Left = 482
    Top = 495
  end
  object ADOT_SGD: TADOTable
    Tag = 1
    Connection = ADOC_Mining
    CursorType = ctStatic
    TableName = #26045#24037#38431
    Left = 178
    Top = 94
    object ADOT_SGDSGD_Id: TSmallintField
      FieldName = 'SGD_Id'
    end
    object ADOT_SGDShaft_Id: TSmallintField
      FieldName = 'Shaft_Id'
    end
    object ADOT_SGDSGDT_N: TWideStringField
      FieldName = 'SGDT_N'
      Size = 10
    end
    object ADOT_SGDSGD_name: TWideStringField
      FieldName = 'SGD_name'
      Size = 15
    end
    object ADOT_SGDMancount: TSmallintField
      FieldName = 'Mancount'
    end
    object ADOT_SGDManger: TWideStringField
      FieldName = 'Manger'
    end
    object ADOT_SGDSalary: TBCDField
      FieldName = 'Salary'
      DisplayFormat = '#.00'
      Precision = 19
    end
  end
  object ADOT_Level: TADOTable
    Tag = 1
    Connection = ADOC_Mining
    CursorType = ctStatic
    TableName = #27700#24179
    Left = 178
    Top = 140
    object ADOT_LevelLevel_Id: TSmallintField
      FieldName = 'Level_Id'
    end
    object ADOT_LevelShaft_Id: TSmallintField
      FieldName = 'Shaft_Id'
    end
    object ADOT_LevelLevel_name: TWideStringField
      FieldName = 'Level_name'
    end
    object ADOT_LevelPro_Storage: TFloatField
      FieldName = 'Pro_Storage'
      DisplayFormat = '#.0000'
    end
    object ADOT_LevelInd_Storage: TFloatField
      FieldName = 'Ind_Storage'
      DisplayFormat = '#.0000'
    end
    object ADOT_LevelHeight: TFloatField
      FieldName = 'Height'
      DisplayFormat = '#.00'
    end
    object ADOT_LevelSer_Year: TSmallintField
      FieldName = 'Ser_Year'
    end
  end
  object ADOT_Layer: TADOTable
    Tag = 1
    Connection = ADOC_Mining
    CursorType = ctStatic
    TableName = #22270#23618
    Left = 178
    Top = 448
  end
  object ADOT_LineT: TADOTable
    Tag = 1
    Connection = ADOC_Mining
    CursorType = ctStatic
    TableName = #32447#22411
    Left = 23
    Top = 448
  end
  object ADOT_TextT: TADOTable
    Tag = 1
    Connection = ADOC_Mining
    CursorType = ctStatic
    TableName = #25991#26412#31867#22411
    Left = 104
    Top = 448
  end
  object ADOT_Stop: TADOTable
    Tag = 1
    Connection = ADOC_Mining
    CursorType = ctStatic
    TableName = #20572#37319#32447#21644#26029#23618#20132#32447
    Left = 23
    Top = 495
  end
  object ADOT_WorkSys: TADOTable
    Tag = 1
    Connection = ADOC_Mining
    CursorType = ctStatic
    TableName = #24037#20316#21046#24230
    Left = 104
    Top = 196
  end
  object ADOT_Cut: TADOTable
    Tag = 1
    Connection = ADOC_Mining
    CursorType = ctStatic
    TableName = #37319#29028#26426
    Left = 24
    Top = 300
  end
  object ADOT_Trace: TADOTable
    Tag = 1
    Connection = ADOC_Mining
    CursorType = ctStatic
    TableName = #28082#21387#25903#26550
    Left = 178
    Top = 303
  end
  object ADOT_DrillEqu: TADOTable
    Tag = 1
    Connection = ADOC_Mining
    CursorType = ctStatic
    TableName = #25496#36827#35774#22791
    Left = 24
    Top = 346
    object ADOT_DrillEquDrillE_Id: TSmallintField
      FieldName = 'DrillE_Id'
    end
    object ADOT_DrillEquShaft_Id: TSmallintField
      FieldName = 'Shaft_Id'
    end
    object ADOT_DrillEquDrillT_Id: TSmallintField
      FieldName = 'DrillT_Id'
    end
    object ADOT_DrillEquDrill: TWideStringField
      FieldName = 'Drill'
    end
    object ADOT_DrillEquLoad: TWideStringField
      FieldName = 'Load'
    end
    object ADOT_DrillEquCarry: TWideStringField
      FieldName = 'Carry'
    end
    object ADOT_DrillEquECou: TSmallintField
      FieldName = 'ECou'
    end
    object ADOT_DrillEquzhulin: TFloatField
      FieldName = 'zhulin'
      DisplayFormat = '#.0000'
    end
    object ADOT_DrillEquField: TStringField
      FieldKind = fkLookup
      FieldName = #36866#29992#24037#33402
      LookupDataSet = ADOT_DrillT
      LookupKeyFields = 'DrillT_Id'
      LookupResultField = 'Drill_Type'
      KeyFields = 'DrillT_Id'
      Lookup = True
    end
  end
  object ADOT_Drill: TADOTable
    Tag = 1
    Connection = ADOC_Mining
    CursorType = ctStatic
    TableName = #25496#36827#26426
    Left = 24
    Top = 391
  end
  object ADOT_Load: TADOTable
    Tag = 1
    Connection = ADOC_Mining
    CursorType = ctStatic
    TableName = #36716#36733#26426
    Left = 104
    Top = 391
  end
  object ADOT_Carry: TADOTable
    Tag = 1
    Connection = ADOC_Mining
    CursorType = ctStatic
    TableName = #36755#36865#26426
    Left = 178
    Top = 391
  end
  object ADOT_Task: TADOTable
    Tag = 1
    Connection = ADOC_Mining
    CursorType = ctStatic
    TableName = #24037#24207
    Left = 336
    Top = 4
    object ADOT_Taskid: TAutoIncField
      FieldName = 'id'
      ReadOnly = True
    end
    object ADOT_TaskTask_Id: TSmallintField
      FieldName = 'Task_Id'
    end
    object ADOT_TaskTaskT_Id: TSmallintField
      FieldName = 'TaskT_Id'
    end
    object ADOT_TaskWLT_Id: TIntegerField
      FieldName = 'WLT_Id'
    end
    object ADOT_Taskshaft_Id: TSmallintField
      FieldName = 'shaft_Id'
    end
    object ADOT_TaskTask_Name: TWideStringField
      FieldName = 'Task_Name'
      Size = 30
    end
    object ADOT_TaskField: TStringField
      FieldKind = fkLookup
      FieldName = #24037#24207#31867#22411
      LookupDataSet = ADOT_TaskT
      LookupKeyFields = 'TaskT_Id'
      LookupResultField = 'TaskT_N'
      KeyFields = 'TaskT_Id'
      Lookup = True
    end
    object ADOT_TaskLightP: TFloatField
      FieldName = 'LightP'
      DisplayFormat = '#.00'
    end
    object ADOT_TaskEqu_Id: TIntegerField
      FieldName = 'Equ_Id'
    end
  end
  object ADOT_Area: TADOTable
    Tag = 1
    Connection = ADOC_Mining
    CursorType = ctStatic
    TableName = #37319#21306
    Left = 178
    Top = 196
    object ADOT_Areaid: TAutoIncField
      FieldName = 'id'
      ReadOnly = True
    end
    object ADOT_AreaArea_Id: TSmallintField
      FieldName = 'Area_Id'
    end
    object ADOT_AreaShaft_Id: TSmallintField
      FieldName = 'Shaft_Id'
    end
    object ADOT_AreaArea_Name: TWideStringField
      FieldName = 'Area_Name'
    end
    object ADOT_AreaSXHill: TWideStringField
      FieldName = 'SXHill'
      Size = 10
    end
    object ADOT_AreaLR: TWideStringField
      FieldName = 'LR'
      Size = 2
    end
    object ADOT_AreaPro_Storage: TFloatField
      FieldName = 'Pro_Storage'
      DisplayFormat = '#.0000'
    end
    object ADOT_AreaInd_Storage: TFloatField
      FieldName = 'Ind_Storage'
      DisplayFormat = '#.0000'
    end
    object ADOT_AreaProCou: TSmallintField
      FieldName = 'ProCou'
    end
  end
  object ADOT_CWork: TADOTable
    Tag = 1
    Connection = ADOC_Mining
    CursorType = ctStatic
    TableName = #24055#36947#22238#37319#38754#23376#34920
    Left = 497
    Top = 50
  end
  object ADOT_LaneT: TADOTable
    Tag = 1
    Connection = ADOC_Mining
    CursorType = ctStatic
    TableName = #24055#36947#26029#38754
    Left = 23
    Top = 53
  end
  object ADOT_Material: TADOTable
    Tag = 1
    Connection = ADOC_Mining
    CursorType = ctStatic
    TableName = #26448#26009
    Left = 23
    Top = 201
    object ADOT_Materialid: TAutoIncField
      FieldName = 'id'
      ReadOnly = True
    end
    object ADOT_MaterialCostN_Id: TSmallintField
      FieldName = 'CostN_Id'
    end
    object ADOT_MaterialShaft_Id: TSmallintField
      FieldName = 'Shaft_Id'
    end
    object ADOT_MaterialCost_name: TWideStringField
      FieldName = 'Cost_name'
      Size = 40
    end
    object ADOT_MaterialUnit_cost: TBCDField
      FieldName = 'Unit_cost'
      DisplayFormat = '#.00'
      Precision = 19
    end
    object ADOT_MaterialUnit: TWideStringField
      FieldName = 'Unit'
      Size = 15
    end
  end
  object ADOT_Coal: TADOTable
    Tag = 1
    Connection = ADOC_Mining
    CursorType = ctStatic
    TableName = #29028#23618
    Left = 178
    Top = 48
    object ADOT_Coalid: TAutoIncField
      FieldName = 'id'
      ReadOnly = True
    end
    object ADOT_CoalCoal_Id: TSmallintField
      FieldName = 'Coal_Id'
    end
    object ADOT_CoalShaft_Id: TSmallintField
      FieldName = 'Shaft_Id'
    end
    object ADOT_CoalCoal_Name: TWideStringField
      FieldName = 'Coal_Name'
      Size = 15
    end
    object ADOT_CoalCH4: TFloatField
      FieldName = 'CH4'
      DisplayFormat = '#.00'
    end
    object ADOT_CoalDensity: TFloatField
      FieldName = 'Density'
      DisplayFormat = '#.00'
    end
    object ADOT_CoalHard: TFloatField
      FieldName = 'Hard'
      DisplayFormat = '#.00'
    end
    object ADOT_CoalMineRate: TBCDField
      FieldName = 'MineRate'
      Precision = 18
      Size = 2
    end
  end
  object ADOT_frus: TADOTable
    Tag = 1
    Connection = ADOC_Mining
    CursorType = ctStatic
    TableName = #26029#23618
    Left = 333
    Top = 196
    object ADOT_frusid: TAutoIncField
      FieldName = 'id'
      ReadOnly = True
    end
    object ADOT_frusfru_Id: TSmallintField
      FieldName = 'fru_Id'
    end
    object ADOT_frusshaft_Id: TSmallintField
      FieldName = 'shaft_Id'