base_check_body.dfm

一个MRPII系统源代码版本

inherited Frm_Base_Check_Body: TFrm_Base_Check_Body
  Left = 323
  Top = 79
  ActiveControl = ControlBar
  Caption = 'Frm_Base_Check_Body'
  PixelsPerInch = 96
  TextHeight = 12
  inherited ControlBar: TControlBar
    inherited ToolBar: TToolBar
      Width = 179
      object ToolButton1: TToolButton
        Left = 23
        Top = 0
        Width = 6
        Caption = 'ToolButton1'
        ImageIndex = 43
        Style = tbsSeparator
      end
      object TlBtn_Check: TToolButton
        Left = 29
        Top = 0
        Action = Act_Check
      end
      object TlBtn_CancelCheck: TToolButton
        Left = 52
        Top = 0
        Action = Act_CancelCheck
      end
      object ToolButton5: TToolButton
        Left = 75
        Top = 0
        Width = 6
        Caption = 'ToolButton5'
        ImageIndex = 46
        Style = tbsSeparator
      end
      object TlBtn_Preview: TToolButton
        Left = 81
        Top = 0
        Action = Act_Preview
      end
      object TlBtn_Print: TToolButton
        Left = 104
        Top = 0
        Action = Act_Print
      end
      object TlBtn_Excel: TToolButton
        Left = 127
        Top = 0
        Action = Act_Excel
      end
      object ToolButton13: TToolButton
        Left = 150
        Top = 0
        Width = 6
        Caption = 'ToolButton13'
        ImageIndex = 52
        Style = tbsSeparator
      end
      object ToolButton4: TToolButton
        Left = 156
        Top = 0
        Action = Act_Quit
      end
    end
  end
  inherited Pnl_Head: TPanel
    Height = 32
    inherited Image1: TImage
      Height = 32
    end
    object Lbl_Condition: TLabel
      Left = 85
      Top = 5
      Width = 6
      Height = 12
      Transparent = True
    end
  end
  inherited Pnl_Body: TPanel
    Top = 87
    Height = 461
    inherited Image3: TImage
      Height = 461
    end
    object DBGridEh: TDBGridEh
      Left = 0
      Top = 0
      Width = 792
      Height = 461
      Align = alClient
      Color = 15727341
      Ctl3D = False
      DataSource = DataSource
      FixedColor = 14673912
      Flat = True
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      FooterColor = clWindow
      FooterFont.Charset = GB2312_CHARSET
      FooterFont.Color = clWindowText
      FooterFont.Height = -12
      FooterFont.Name = #23435#20307
      FooterFont.Style = []
      ImeName = #20013#25991' ('#31616#20307') - '#25340#38899#21152#21152
      ParentCtl3D = False
      ParentFont = False
      ReadOnly = True
      RowHeight = 17
      TabOrder = 0
      TitleFont.Charset = ANSI_CHARSET
      TitleFont.Color = clWindowText
      TitleFont.Height = -11
      TitleFont.Name = 'MS Sans Serif'
      TitleFont.Style = []
      TitleHeight = 16
      VTitleMargin = 3
      OnDrawDataCell = DBGridEhDrawDataCell
      OnGetCellParams = DBGridEhGetCellParams
    end
  end
  inherited AdoQry_Tmp: TADOQuery
    Left = 389
    Top = 171
  end
  inherited ActionList: TActionList
    Left = 208
    inherited Act_Excel: TAction
      Enabled = False
      Visible = False
    end
  end
  object AdoQry_Body: TADOQuery
    ConnectionString = 'FILE NAME=Mrpii.udl'
    CursorType = ctStatic
    LockType = ltBatchOptimistic
    AfterOpen = AdoQueryAfterOpen
    EnableBCD = False
    Parameters = <>
    Left = 312
    Top = 169
  end
  object DataSource: TDataSource
    DataSet = AdoQry_Body
    Left = 352
    Top = 185
  end
end