product_analyse.dfm

完整的delphi书籍源代码,大家有空的时候自己慢慢看看

object Product_AnalyseFrm: TProduct_AnalyseFrm
  Left = 181
  Top = 222
  Width = 526
  Height = 439
  Caption = #36136#37327#20998#26512
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  Position = poScreenCenter
  Visible = True
  WindowState = wsMaximized
  PixelsPerInch = 96
  TextHeight = 13
  object RadioGroup1: TRadioGroup
    Left = 8
    Top = 16
    Width = 497
    Height = 81
    Caption = #36136#26816#20869#23481
    ItemIndex = 0
    Items.Strings = (
      #20135#21697#36136#37327#20998#26512'        '#20135#21697#21517#31216#65306
      #29983#20135#36136#37327#20998#26512'        '#29983#20135#37096#38376#65306)
    TabOrder = 0
    OnClick = RadioGroup1Click
  end
  object DBLookupComboBox1: TDBLookupComboBox
    Left = 195
    Top = 34
    Width = 118
    Height = 20
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -12
    Font.Name = #23435#20307
    Font.Style = []
    KeyField = 'Product_Name'
    ListField = 'Product_Name'
    ListSource = DM.ProductDS
    ParentFont = False
    TabOrder = 1
  end
  object BitBtn1: TBitBtn
    Left = 416
    Top = 48
    Width = 75
    Height = 25
    Caption = #21047#26032
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -12
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
    TabOrder = 2
    OnClick = BitBtn1Click
    Glyph.Data = {
      36040000424D3604000000000000360000002800000010000000100000000100
      2000000000000004000000000000000000000000000000000000FF00FF00FF00
      FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
      FF00FF00FF00FF00FF00FF00FF00C0C0C00000000000FF00FF00FF00FF00FF00
      FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
      FF00FF00FF00FF00FF00C0C0C000000000000080800000000000FF00FF00FF00
      FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
      FF00FF00FF00C0C0C000000000000080800080800000FF00FF00FF00FF00FF00
      FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
      FF00C0C0C000000000000080800080800000FF00FF00FF00FF00FF00FF00FF00
      FF00FF00FF00FF00FF00C0C0C000C0C0C000C0C0C000FF00FF00FF00FF00C0C0
      C000000000000080800080800000FF00FF00FF00FF00FF00FF00FF00FF00FF00
      FF00C0C0C0000000000000000000000000000000000080808000C0C0C0000000
      0000FFFFFF0080800000FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00C0C0
      C000C0C0C00000000000C0C0C000C0C0C000C0C0C00000000000000000008080
      000000000000FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF000000
      0000C0C0C000FFFF0000FFFFFF00FFFFFF00FFFFFF00FFFF0000000000000000
      0000C0C0C000FF00FF00FF00FF00FF00FF00FF00FF00FF00FF0000000000C0C0
      C000FFFF0000FFFF0000C0C0C0008080000080800000FFFFFF00FFFF00000000
      000080808000FF00FF00FF00FF00FF00FF00FF00FF00FF00FF0000000000FFFF
      0000FFFF0000FFFF0000FFFF0000FFFF0000C0C0C00080800000FFFFFF00C0C0
      C00000000000FF00FF00FF00FF00FF00FF00FF00FF00FF00FF0000000000FFFF
      0000FFFFFF00FFFF0000FFFF0000FFFF0000FFFF000080800000FFFFFF00C0C0
      C00000000000FF00FF00FF00FF00FF00FF00FF00FF00FF00FF0000000000FFFF
      0000FFFFFF00FFFF0000FFFF0000FFFFFF00FFFF0000C0C0C000FFFFFF00C0C0
      C00000000000FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00C0C0C000C0C0
      C000FFFF0000FFFFFF00FFFF0000FFFF0000FFFF0000FFFF0000FFFF00000000
      000000000000FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00000000000000
      0000C0C0C000FFFF0000FFFFFF00FFFFFF00FFFFFF00FFFF0000C0C0C000C0C0
      C000FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF000000
      000000000000C0C0C000FFFF0000FFFF0000C0C0C000C0C0C00000000000FF00
      FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
      FF0000000000C0C0C00000000000000000000000000000000000FF00FF00FF00
      FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00}
  end
  object DBLookupComboBox2: TDBLookupComboBox
    Left = 195
    Top = 66
    Width = 118
    Height = 20
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -12
    Font.Name = #23435#20307
    Font.Style = []
    KeyField = 'Manufacture_Name'
    ListField = 'Manufacture_Name'
    ListSource = DM.ManufactureDS
    ParentFont = False
    TabOrder = 3
  end
  object Chart1: TChart
    Left = 8
    Top = 104
    Width = 497
    Height = 297
    BackWall.Brush.Color = clWhite
    BackWall.Brush.Style = bsClear
    MarginBottom = 0
    MarginLeft = 2
    MarginTop = 5
    Title.Text.Strings = (
      '')
    BottomAxis.DateTimeFormat = 'yyyy-M-d'
    BottomAxis.Increment = 1.000000000000000000
    BottomAxis.Title.Caption = #36136#26816#26085#26399
    LeftAxis.Automatic = False
    LeftAxis.AutomaticMaximum = False
    LeftAxis.AutomaticMinimum = False
    LeftAxis.ExactDateTime = False
    LeftAxis.Increment = 0.001000000000000000
    LeftAxis.LabelStyle = talMark
    LeftAxis.Maximum = 1.000000000000000000
    LeftAxis.Title.Caption = #30334#20998#27604#65288'%'#65289
    TopAxis.LabelStyle = talNone
    View3D = False
    TabOrder = 4
    object Label1: TLabel
      Left = 184
      Top = 8
      Width = 132
      Height = 21
      Caption = #20135#21697#36136#37327#20998#26512
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -21
      Font.Name = #38582#20070
      Font.Style = []
      ParentFont = False
    end
    object Series1: TBarSeries
      Tag = 1
      Marks.ArrowLength = 35
      Marks.Style = smsValue
      Marks.Visible = True
      SeriesColor = clRed
      Title = #27491#21697
      BarWidthPercent = 35
      XValues.DateTime = True
      XValues.Name = 'X'
      XValues.Multiplier = 1.000000000000000000
      XValues.Order = loAscending
      YValues.DateTime = False
      YValues.Name = 'Bar'
      YValues.Multiplier = 1.000000000000000000
      YValues.Order = loNone
    end
    object Series2: TBarSeries
      Tag = 2
      Marks.ArrowLength = 20
      Marks.Style = smsValue
      Marks.Visible = True
      SeriesColor = clGreen
      Title = #27425#21697
      BarWidthPercent = 35
      XValues.DateTime = True
      XValues.Name = 'X'
      XValues.Multiplier = 1.000000000000000000
      XValues.Order = loAscending
      YValues.DateTime = False
      YValues.Name = 'Bar'
      YValues.Multiplier = 1.000000000000000000
      YValues.Order = loNone
    end
    object Series3: TBarSeries
      Tag = 3
      Marks.ArrowLength = 20
      Marks.Style = smsValue
      Marks.Visible = True
      SeriesColor = clYellow
      Title = #24223#21697
      BarWidthPercent = 35
      XValues.DateTime = True
      XValues.Name = 'X'
      XValues.Multiplier = 1.000000000000000000
      XValues.Order = loAscending
      YValues.DateTime = False
      YValues.Name = 'Bar'
      YValues.Multiplier = 1.000000000000000000
      YValues.Order = loNone
    end
  end
end