areacoalinfo_unt.dfm

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

inherited AreaCoalInfo_Frm: TAreaCoalInfo_Frm
  Left = 190
  Top = 150
  VertScrollBar.Range = 0
  Align = alClient
  BorderIcons = []
  BorderStyle = bsNone
  Caption = 'AreaCoalInfo_Frm'
  PixelsPerInch = 96
  TextHeight = 13
  inherited Panel2: TPanel
    object Label1: TLabel [0]
      Tag = 11
      Left = 16
      Top = 72
      Width = 49
      Height = 25
      AutoSize = False
      Caption = #37319#21306#65306
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object Label2: TLabel [1]
      Tag = 13
      Left = 200
      Top = 72
      Width = 41
      Height = 25
      AutoSize = False
      Caption = #29028#23618#65306
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object Label3: TLabel [2]
      Tag = 15
      Left = 328
      Top = 72
      Width = 89
      Height = 25
      AutoSize = False
      Caption = #35813#29028#23618#21547#37327#65306
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
    end
    inherited DBGrid1: TDBGrid
      Columns = <
        item
          Expanded = False
          FieldName = 'Id'
          Visible = True
        end
        item
          Expanded = False
          FieldName = #37319#21306
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'Sequence'
          Visible = True
        end
        item
          Expanded = False
          FieldName = #29028#23618
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'Coal_Percent'
          Visible = True
        end>
    end
    object DBLookupComboBox1: TDBLookupComboBox
      Tag = 12
      Left = 72
      Top = 72
      Width = 121
      Height = 21
      DataField = 'Area_Id'
      DataSource = Base_DataS
      Enabled = False
      ImeName = #32043#20809#25340#38899#36755#20837#27861
      KeyField = 'Area_Id'
      ListField = 'Area_Name'
      ListSource = Area_DataS
      TabOrder = 1
      OnKeyDown = DBLookupComboBox1KeyDown
    end
    object DBLookupComboBox2: TDBLookupComboBox
      Tag = 14
      Left = 248
      Top = 72
      Width = 81
      Height = 21
      DataField = 'Coal_Id'
      DataSource = Base_DataS
      Enabled = False
      ImeName = #32043#20809#25340#38899#36755#20837#27861
      KeyField = 'Coal_Id'
      ListField = 'Coal_Name'
      ListSource = Coal_DataS
      TabOrder = 2
      OnKeyDown = DBLookupComboBox2KeyDown
    end
    object DBEdit1: TDBEdit
      Tag = 16
      Left = 408
      Top = 72
      Width = 97
      Height = 21
      DataField = 'Coal_Percent'
      DataSource = Base_DataS
      Enabled = False
      ImeName = #32043#20809#25340#38899#36755#20837#27861
      TabOrder = 3
      OnKeyDown = DBEdit1KeyDown
    end
  end
  inherited Base_DataS: TDataSource
    DataSet = Data_Frm.AreaCoal_AdoTab
    Left = 232
    Top = 48
  end
  object Area_DataS: TDataSource
    DataSet = Data_Frm.Area_AdoTab
    Left = 264
    Top = 48
  end
  object Coal_DataS: TDataSource
    DataSet = Data_Frm.Coal_AdoTab
    Left = 296
    Top = 48
  end
end