priortask_unt.dfm

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

inherited PriorTask_Frm: TPriorTask_Frm
  Left = 153
  Top = 112
  Width = 563
  Height = 305
  Caption = #21508#20010#25496#36827#20219#21153#20043#21069#30340#25496#36827#20219#21153
  PixelsPerInch = 96
  TextHeight = 13
  inherited Panel1: TPanel
    Width = 555
    inherited BitBtn1: TBitBtn
      Left = 8
    end
    inherited BitBtn2: TBitBtn
      Left = 80
    end
    inherited BitBtn3: TBitBtn
      Left = 160
    end
    inherited BitBtn4: TBitBtn
      Left = 224
    end
    inherited BitBtn5: TBitBtn
      Left = 272
    end
    inherited BitBtn6: TBitBtn
      Left = 328
    end
    inherited BitBtn7: TBitBtn
      Left = 384
    end
    inherited BitBtn8: TBitBtn
      Left = 440
    end
  end
  inherited Panel2: TPanel
    Width = 555
    Height = 237
    object Label1: TLabel [0]
      Tag = 11
      Left = 40
      Top = 80
      Width = 81
      Height = 25
      AutoSize = False
      Caption = #25496#36827#20219#21153#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 = 272
      Top = 80
      Width = 89
      Height = 25
      AutoSize = False
      Caption = #21069#32622#20219#21153#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
      Top = 194
      Width = 553
      Columns = <
        item
          Expanded = False
          FieldName = 'Sequence'
          Width = 40
          Visible = True
        end
        item
          Expanded = False
          FieldName = #25496#36827#20219#21153
          Width = 200
          Visible = True
        end
        item
          Expanded = False
          FieldName = #21069#24037#24207
          Width = 200
          Visible = True
        end>
    end
    object DBLookupComboBox1: TDBLookupComboBox
      Tag = 12
      Left = 112
      Top = 80
      Width = 121
      Height = 21
      Color = clMoneyGreen
      DataField = 'Lane_Id'
      DataSource = Base_DataS
      Enabled = False
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clFuchsia
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ImeName = #32043#20809#25340#38899#36755#20837#27861
      KeyField = 'Lane_Id'
      ParentFont = False
      TabOrder = 1
      OnClick = DBLookupComboBox1Click
      OnKeyDown = DBLookupComboBox1KeyDown
    end
    object DBLookupComboBox2: TDBLookupComboBox
      Tag = 14
      Left = 352
      Top = 80
      Width = 129
      Height = 21
      Color = clMoneyGreen
      DataField = 'PriorLane_Id'
      DataSource = Base_DataS
      Enabled = False
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clFuchsia
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ImeName = #32043#20809#25340#38899#36755#20837#27861
      ParentFont = False
      TabOrder = 2
      OnKeyDown = DBLookupComboBox2KeyDown
    end
    object BitBtn9: TBitBtn
      Left = 224
      Top = 8
      Width = 75
      Height = 25
      Caption = #25554#20837
      TabOrder = 3
      OnClick = BitBtn9Click
    end
  end
  inherited Base_DataS: TDataSource
    DataSet = Data_Frm.PriorTask_AdoTab
    Left = 384
    Top = 240
  end
  object Lane_DataS: TDataSource
    DataSet = Lane_AdoQ
    Left = 160
    Top = 112
  end
  object SelectPriorTask_DataS: TDataSource
    DataSet = SelectPriorTask_AdoQ
    Left = 432
    Top = 120
  end
  object SelectPriorTask_AdoQ: TADOQuery
    Connection = Data_Frm.MD_Connection
    Parameters = <>
    Left = 400
    Top = 120
  end
  object Lane_AdoQ: TADOQuery
    Connection = Data_Frm.MD_Connection
    Parameters = <>
    Left = 120
    Top = 112
  end
end