hrm230_01.dfm.svn-base

这是一个功能齐全的,代码完整的ERP企业信息管理系统,现在上传和大家分享

inherited Hrm230_01Form: THrm230_01Form
  Left = 199
  Top = 108
  Width = 600
  Height = 445
  HelpContext = 94
  Caption = #21592#24037#32467#26500#20998#26512
  OldCreateOrder = True
  PixelsPerInch = 96
  TextHeight = 12
  object ScrollBox1: TScrollBox [0]
    Left = 0
    Top = 80
    Width = 592
    Height = 338
    Align = alClient
    Color = clWhite
    ParentColor = False
    TabOrder = 0
    object DBChart1: TDBChart
      Left = 30
      Top = 22
      Width = 480
      Height = 260
      BackWall.Brush.Color = clWhite
      BackWall.Color = clWhite
      Title.Text.Strings = (
        '')
      BackColor = clWhite
      Legend.TextStyle = ltsRightValue
      View3DOptions.Elevation = 315
      View3DOptions.Orthogonal = False
      View3DOptions.Perspective = 0
      View3DOptions.Rotation = 360
      BevelOuter = bvNone
      Color = clWindow
      TabOrder = 0
      object Series1: TBarSeries
        Marks.ArrowLength = 8
        Marks.Style = smsLabelValue
        Marks.Visible = True
        DataSource = ADODataSet1
        SeriesColor = clRed
        XLabelsSource = 'R130_001'
        XValues.DateTime = False
        XValues.Name = 'X'
        XValues.Multiplier = 1
        XValues.Order = loAscending
        XValues.ValueSource = 'R130_003'
        YValues.DateTime = False
        YValues.Name = 'Bar'
        YValues.Multiplier = 1
        YValues.Order = loNone
        YValues.ValueSource = 'R130_002'
      end
      object Series2: TPieSeries
        Active = False
        Marks.ArrowLength = 8
        Marks.Style = smsLabelValue
        Marks.Visible = True
        DataSource = ADODataSet1
        SeriesColor = clGreen
        XLabelsSource = 'R130_001'
        OtherSlice.Text = 'Other'
        PieValues.DateTime = False
        PieValues.Name = 'Pie'
        PieValues.Multiplier = 1
        PieValues.Order = loNone
        PieValues.ValueSource = 'R130_002'
      end
    end
  end
  object Panel1: TPanel [1]
    Left = 0
    Top = 43
    Width = 592
    Height = 37
    Align = alTop
    BevelInner = bvRaised
    BevelOuter = bvLowered
    TabOrder = 1
    DesignSize = (
      592
      37)
    object Image1: TImage
      Left = 2
      Top = 2
      Width = 588
      Height = 33
      Align = alClient
      Stretch = True
    end
    object lblCondition: TLabel
      Left = 155
      Top = 14
      Width = 48
      Height = 12
      Anchors = [akTop, akRight]
      Caption = #20998#26512#26465#20214
      Transparent = True
    end
    object lblType: TLabel
      Left = 318
      Top = 14
      Width = 48
      Height = 12
      Anchors = [akTop, akRight]
      Caption = #22270#34920#31867#22411
      Transparent = True
    end
    object lblShow: TLabel
      Left = 465
      Top = 14
      Width = 24
      Height = 12
      Anchors = [akTop, akRight]
      Caption = #26174#31034
      Transparent = True
    end
    object ComboBox1: TComboBox
      Left = 207
      Top = 9
      Width = 104
      Height = 20
      Style = csDropDownList
      Anchors = [akTop, akRight]
      ItemHeight = 12
      TabOrder = 0
      OnChange = ComboBox1Change
    end
    object ComboBox2: TComboBox
      Left = 369
      Top = 9
      Width = 90
      Height = 20
      Style = csDropDownList
      Anchors = [akTop, akRight]
      ItemHeight = 12
      TabOrder = 1
      OnChange = ComboBox3Change
    end
    object ComboBox3: TComboBox
      Left = 495
      Top = 9
      Width = 82
      Height = 20
      Style = csDropDownList
      Anchors = [akTop, akRight]
      ItemHeight = 12
      TabOrder = 2
      OnChange = ComboBox3Change
    end
  end
  object CoolBar1: TCoolBar [2]
    Left = 0
    Top = 0
    Width = 592
    Height = 43
    AutoSize = True
    Bands = <
      item
        Control = ToolBar1
        ImageIndex = -1
        MinHeight = 39
        Width = 588
      end>
    object ToolBar1: TToolBar
      Left = 9
      Top = 0
      Width = 575
      Height = 39
      AutoSize = True
      ButtonHeight = 39
      ButtonWidth = 31
      Caption = 'ToolBar1'
      EdgeBorders = []
      Flat = True
      Images = SYSDM.imgBtn
      ParentShowHint = False
      ShowCaptions = True
      ShowHint = True
      TabOrder = 0
      object tlbPrint: TToolButton
        Left = 0
        Top = 0
        AutoSize = True
        Caption = #25171#21360
        ImageIndex = 12
        OnClick = tlbPrintClick
      end
      object ToolButton4: TToolButton
        Left = 35
        Top = 0
        Width = 8
        Caption = 'ToolButton4'
        ImageIndex = 13
        Style = tbsSeparator
      end
      object tlbExit: TToolButton
        Left = 43
        Top = 0
        AutoSize = True
        Caption = #36864#20986
        ImageIndex = 15
        OnClick = tlbExitClick
      end
    end
  end
  object ADOQuery1: TADOQuery
    Connection = SYSDM.ADOC
    Parameters = <>
    Left = 104
    Top = 96
  end
  object ADODataSet1: TADODataSet
    Connection = SYSDM.ADOC
    CursorType = ctStatic
    LockType = ltBatchOptimistic
    CommandType = cmdTable
    FieldDefs = <
      item
        Name = 'R130_001'
        DataType = ftString
        Size = 20
      end
      item
        Name = 'R130_002'
        Attributes = [faFixed]
        DataType = ftFloat
      end
      item
        Name = 'R130_003'
        Attributes = [faFixed]
        DataType = ftFloat
      end>
    Parameters = <>
    StoreDefs = True
    Left = 16
    Top = 112
  end
end