unt_project.dfm

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

inherited Frm_Project: TFrm_Project
  Left = 70
  Top = 108
  Width = 695
  Height = 435
  BorderIcons = [biSystemMenu]
  BorderStyle = bsSizeable
  Caption = #21160#24577#28436#31034
  OldCreateOrder = True
  PixelsPerInch = 96
  TextHeight = 13
  inherited Panel3: TPanel
    Top = 368
    Width = 687
    inherited Btn_Exit: TBitBtn
      Left = 320
      Width = 97
      Font.Height = -20
      Font.Style = [fsBold]
      ParentFont = False
    end
  end
  inherited Panel4: TPanel
    Width = 686
    Height = 368
    object GroupBox2: TGroupBox
      Left = 0
      Top = 0
      Width = 686
      Height = 68
      Align = alTop
      Caption = #36755#20986#26465#20214#35774#32622
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -16
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
      TabOrder = 0
      object RGP_ProMod: TRadioGroup
        Left = 2
        Top = 18
        Width = 679
        Height = 48
        Align = alLeft
        Caption = #35745#21010#24418#24335
        Columns = 3
        ItemIndex = 0
        Items.Strings = (
          #24635#35745#21010
          #22238#37319
          #25496#36827)
        TabOrder = 0
      end
    end
    object GroupBox4: TGroupBox
      Left = 0
      Top = 68
      Width = 686
      Height = 47
      Align = alTop
      Caption = #35745#21010#36755#20986#26102#38388
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -16
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
      TabOrder = 1
      object CbxYear: TComboBox
        Left = 230
        Top = 19
        Width = 77
        Height = 24
        Color = clMoneyGreen
        Font.Charset = ANSI_CHARSET
        Font.Color = clFuchsia
        Font.Height = -16
        Font.Name = #23435#20307
        Font.Style = []
        ImeName = #32043#20809#25340#38899#36755#20837#27861
        ItemHeight = 16
        ParentFont = False
        TabOrder = 0
        Visible = False
        Items.Strings = (
          '2001'
          '2002'
          '2003'
          '2004'
          '2005'
          '2006'
          '2007'
          '2008'
          '2009'
          '2010'
          '2011'
          '2012'
          '2013'
          '2014'
          '2015'
          '2016')
      end
      object CbxQuarter: TComboBox
        Left = 397
        Top = 18
        Width = 84
        Height = 24
        Color = clMoneyGreen
        Font.Charset = ANSI_CHARSET
        Font.Color = clFuchsia
        Font.Height = -16
        Font.Name = #23435#20307
        Font.Style = []
        ImeName = #32043#20809#25340#38899#36755#20837#27861
        ItemHeight = 16
        ParentFont = False
        TabOrder = 1
        Visible = False
        Items.Strings = (
          '1'
          '2'
          '3'
          '4')
      end
      object CbxMonth: TComboBox
        Left = 573
        Top = 18
        Width = 84
        Height = 24
        Color = clMoneyGreen
        Font.Charset = ANSI_CHARSET
        Font.Color = clFuchsia
        Font.Height = -16
        Font.Name = #23435#20307
        Font.Style = []
        ImeName = #32043#20809#25340#38899#36755#20837#27861
        ItemHeight = 16
        ParentFont = False
        TabOrder = 2
        Visible = False
        Items.Strings = (
          '1'
          '2'
          '3'
          '4'
          '5'
          '6'
          '7'
          '8'
          '9'
          '10'
          '11'
          '12')
      end
      object RBtnY: TRadioButton
        Left = 170
        Top = 24
        Width = 50
        Height = 16
        Caption = #24180#24230
        TabOrder = 3
        OnClick = RBtnYClick
      end
      object RBtnQ: TRadioButton
        Left = 336
        Top = 23
        Width = 51
        Height = 16
        Caption = #23395#24230
        TabOrder = 4
        OnClick = RBtnYClick
      end
      object RBtnM: TRadioButton
        Left = 513
        Top = 23
        Width = 49
        Height = 16
        Caption = #26376#24230
        TabOrder = 5
        OnClick = RBtnYClick
      end
      object RBtnA: TRadioButton
        Left = 49
        Top = 23
        Width = 84
        Height = 18
        Caption = #24635#35745#21010#26399
        Checked = True
        TabOrder = 6
        TabStop = True
        OnClick = RBtnYClick
      end
    end
    object Panel1: TPanel
      Left = 0
      Top = 115
      Width = 686
      Height = 40
      Align = alTop
      BevelInner = bvLowered
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -16
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
      TabOrder = 2
      object Btn_SimShow: TBitBtn
        Left = 200
        Top = 5
        Width = 241
        Height = 30
        Caption = #21015#20986#21160#24577#28436#31034#35745#21010
        Font.Charset = GB2312_CHARSET
        Font.Color = clWindowText
        Font.Height = -24
        Font.Name = #38582#20070
        Font.Style = [fsBold]
        ParentFont = False
        TabOrder = 0
        OnClick = Btn_SimShowClick
        Glyph.Data = {
          76010000424D7601000000000000760000002800000020000000100000000100
          04000000000000010000120B0000120B00001000000000000000000000000000
          800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555555555555
          5555555FFFFFFFFFF5555550000000000555557777777777F5555550FFFFFFFF
          0555557F5FFFF557F5555550F0000FFF0555557F77775557F5555550FFFFFFFF
          0555557F5FFFFFF7F5555550F000000F0555557F77777757F5555550FFFFFFFF
          0555557F5FFFFFF7F5555550F000000F0555557F77777757F5555550FFFFFFFF
          0555557F5FFF5557F5555550F000FFFF0555557F77755FF7F5555550FFFFF000
          0555557F5FF5777755555550F00FF0F05555557F77557F7555555550FFFFF005
          5555557FFFFF7755555555500000005555555577777775555555555555555555
          5555555555555555555555555555555555555555555555555555}
        NumGlyphs = 2
        Spacing = 0
      end
    end
    object SGrid_MD: TStringGrid
      Left = 0
      Top = 155
      Width = 686
      Height = 173
      Align = alClient
      BorderStyle = bsNone
      ColCount = 14
      RowCount = 2
      Font.Charset = ANSI_CHARSET
      Font.Color = clFuchsia
      Font.Height = -16
      Font.Name = #23435#20307
      Font.Style = []
      Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goRangeSelect, goColSizing]
      ParentFont = False
      TabOrder = 3
      ColWidths = (
        64
        99
        215
        59
        99
        101
        69
        64
        113
        102
        127
        100
        136
        83)
      RowHeights = (
        24
        24)
    end
    object Panel5: TPanel
      Left = 0
      Top = 328
      Width = 686
      Height = 40
      Align = alBottom
      BevelInner = bvLowered
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -16
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
      TabOrder = 4
      object Label1: TLabel
        Left = 9
        Top = 12
        Width = 32
        Height = 16
        Caption = #22270#32440
      end
      object Label44: TLabel
        Left = 486
        Top = 13
        Width = 64
        Height = 16
        Caption = #28436#31034#36895#24230
        Font.Charset = ANSI_CHARSET
        Font.Color = clRed
        Font.Height = -16
        Font.Name = #23435#20307
        Font.Style = []
        ParentFont = False
      end
      object Label36: TLabel
        Left = 621
        Top = 14
        Width = 49
        Height = 14
        Caption = #27627#31186'/'#22825
        Font.Charset = GB2312_CHARSET
        Font.Color = clWindowText
        Font.Height = -14
        Font.Name = #23435#20307
        Font.Style = []
        ParentFont = False
      end
      object Btn_Con: TBitBtn
        Left = 246
        Top = 5
        Width = 86
        Height = 30
        Caption = #30830#23450
        Font.Charset = ANSI_CHARSET
        Font.Color = clBlack
        Font.Height = -16
        Font.Name = #23435#20307
        Font.Style = []
        ParentFont = False
        TabOrder = 1
        Visible = False
        Glyph.Data = {
          76010000424D7601000000000000760000002800000020000000100000000100
          04000000000000010000120B0000120B00001000000000000000000000000000
          800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00559999999995
          5555557777777775F5555559999999505555555777777757FFF5555555555550
          0955555555555FF7775F55555555995501955555555577557F75555555555555
          01995555555555557F5755555555555501905555555555557F57555555555555
          0F905555555555557FF75555555555500005555555555557777555555555550F
          F05555555555557F57F5555555555008F05555555555F775F755555555570000
          05555555555775577555555555700007555555555F755F775555555570000755
          55555555775F77555555555700075555555555F75F7755555555570007555555
          5555577F77555555555500075555555555557777555555555555}
        NumGlyphs = 2
        Spacing = 0
      end
      object Btn_Add: TBitBtn
        Left = 224
        Top = 5
        Width = 113
        Height = 30
        Caption = #36827#34892#20223#30495
        Enabled = False
        TabOrder = 0
        OnClick = Btn_AddClick
        Glyph.Data = {
          76010000424D7601000000000000760000002800000020000000100000000100
          04000000000000010000120B0000120B00001000000000000000000000000000
          800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
          3333333333FFFFF3333333333000003333333333F777773FF333333008877700
          33333337733FFF773F33330887000777033333733F777FFF73F3308800000007
          703337F37777777FF7F33080000000007033373777777777F73F087000111000
          77037F3777333777FF7F08000111110007037F777F3333777F7F0F0001111100
          07037F777F3333777F7F0F000811110008037F777FF33377737F0F7000881000
          780373F777FFF777F373308000000000803337F77777777737F330F800000008
          8033373F777777733733330F8700078803333373FF77733F733333300FFF8800
          3333333773FFFF77333333333000003333333333377777333333}
        NumGlyphs = 2
        Spacing = 0
      end
      object DBLookupComboBox1: TDBLookupComboBox
        Left = 43
        Top = 9
        Width = 136
        Height = 24
        Color = clMoneyGreen
        Font.Charset = ANSI_CHARSET
        Font.Color = clFuchsia
        Font.Height = -16
        Font.Name = #23435#20307
        Font.Style = []
        ImeName = #32043#20809#25340#38899#36755#20837#27861
        KeyField = 'Graphic_Id'
        ListField = 'Graphic_Name'
        ListSource = Ds_Graph
        ParentFont = False
        TabOrder = 4
        OnClick = DBLookupComboBox1Click
      end
      object Btn_Del: TBitBtn
        Left = 360
        Top = 5
        Width = 122
        Height = 30
        Caption = #35843#25972#20223#30495#36895#24230
        Enabled = False
        TabOrder = 2
        OnClick = Btn_DelClick
        Glyph.Data = {
          76010000424D7601000000000000760000002800000020000000100000000100
          04000000000000010000120B0000120B00001000000000000000000000000000
          800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
          3333333333FFFFF3333333333700000733333333F777773FF3333333007F0F70
          0333333773373377FF3333300FFF7FFF003333773F3333377FF33300F0FFFFF0
          F00337737333F37377F33707FFFF0FFFF70737F33337F33337FF300FFFFF0FFF
          FF00773F3337F333377F30707FFF0FFF70707F733337F333737F300FFFF09FFF
          FF0077F33377F33337733707FF0F9FFFF70737FF3737F33F37F33300F0FF9FF0
          F003377F7337F373773333300FFF9FFF00333377FF37F3377FF33300007F9F70
          000337777FF7FF77773333703070007030733373777777737333333333330333
          333333333337FF33333333333330003333333333337773333333}
        NumGlyphs = 2
        Spacing = 0
      end
      object Edt_Int: TEdit
        Left = 560
        Top = 9
        Width = 57
        Height = 27
        Color = clMoneyGreen
        Font.Charset = ANSI_CHARSET
        Font.Color = clFuchsia
        Font.Height = -19
        Font.Name = #23435#20307
        Font.Style = []
        ImeName = #32043#20809#25340#38899#36755#20837#27861
        ParentFont = False
        TabOrder = 3
        Text = '1000'
      end
    end
  end
  inherited GroupBox1: TGroupBox
    Left = 686
    Width = 1
    Height = 368
  end
  object Ds_Level: TDataSource
    DataSet = Frm_data.ADOT_Level
    Left = 544
    Top = 40
  end
  object ADOQ_Other: TADOQuery
    Connection = Frm_data.ADOC_Mining
    CursorType = ctStatic
    Parameters = <>
    Left = 544
    Top = 112
  end
  object ADOQ_DSGD: TADOQuery
    Connection = Frm_data.ADOC_Mining
    CursorType = ctStatic
    Parameters = <>
    Left = 544
    Top = 144
  end
  object Ds_Other: TDataSource
    DataSet = ADOQ_Other
    Left = 544
    Top = 176
  end
  object Ds_Graph: TDataSource
    DataSet = Frm_data.ADOT_Graph
    Left = 544
    Top = 208
  end
  object ADOQ_MDPlan: TADOQuery
    Parameters = <>
    Left = 544
    Top = 240
  end
  object DS_MDPlan: TDataSource
    DataSet = ADOQ_MDPlan
    Left = 544
    Top = 272
  end
  object Tim_DyShow: TTimer
    Enabled = False
    OnTimer = Tim_DyShowTimer
    Left = 504
    Top = 8
  end
end