cutmachine_unt.dfm

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

inherited CutMachine_Frm: TCutMachine_Frm
  Left = 193
  Top = 300
  Height = 183
  Align = alBottom
  Caption = #37319#29028#26426#21442#25968
  FormStyle = fsStayOnTop
  OnClose = nil
  PixelsPerInch = 96
  TextHeight = 13
  inherited Panel2: TPanel
    Height = 115
    inherited DBGrid1: TDBGrid
      Top = 1
      Height = 113
      Align = alClient
      Columns = <
        item
          Expanded = False
          FieldName = 'CutMachine_Id'
          Title.Color = clActiveBorder
          Title.Font.Charset = DEFAULT_CHARSET
          Title.Font.Color = clWindowText
          Title.Font.Height = -11
          Title.Font.Name = 'MS Sans Serif'
          Title.Font.Style = []
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'Type'
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'Max_MiningH'
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'Min_MiningH'
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'Min_CoalHard'
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'Max_CoalHard'
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'Adapt_Obliquity'
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'Truncation_Depth'
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'MachineBody_Length'
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'Roller_Dia'
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'Roller_Amount'
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'Drag_Method'
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'Drag_Force'
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'Rating_Velocity'
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'Roller_CenterDis'
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'Machine_Height'
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'Down_Amount'
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'Electromotor_Type'
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'Power'
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'Peak_ControlDis'
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'Design_Lab'
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'Making_Corp'
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'Reference_Price'
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'Weight'
          Visible = True
        end>
    end
  end
  inherited Base_DataS: TDataSource
    DataSet = Data_Frm.CutMachine_AdoTab
  end
end