unit1.dfm

《TeeChart应用技术详解》(屈景辉)源代码

object Form1: TForm1
  Left = 329
  Top = 104
  Width = 379
  Height = 303
  Caption = 'TeeOpenGL'#32452#20214#21151#33021#28436#31034
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  OnActivate = FormActivate
  PixelsPerInch = 96
  TextHeight = 13
  object Panel1: TPanel
    Left = 0
    Top = 228
    Width = 371
    Height = 41
    Align = alBottom
    TabOrder = 0
    object CheckBox1: TCheckBox
      Left = 16
      Top = 12
      Width = 89
      Height = 17
      Caption = #28608#27963'OpenGL'
      TabOrder = 0
      OnClick = CheckBox1Click
    end
    object Button1: TButton
      Left = 224
      Top = 8
      Width = 129
      Height = 25
      Caption = #35843#29992#22270#34920#32534#36753#22120
      TabOrder = 1
      OnClick = Button1Click
    end
    object CheckBox2: TCheckBox
      Left = 112
      Top = 13
      Width = 49
      Height = 17
      Caption = #26631#31614
      Checked = True
      State = cbChecked
      TabOrder = 2
      OnClick = CheckBox2Click
    end
  end
  object Chart1: TChart
    Left = 0
    Top = 33
    Width = 371
    Height = 195
    Gradient.EndColor = 33023
    Gradient.MidColor = clWhite
    Gradient.StartColor = 4227327
    Gradient.Visible = True
    Legend.Visible = False
    Title.Text.Strings = (
      'OpenGL'#28436#31034)
    Chart3DPercent = 45
    DepthAxis.Visible = True
    View3DOptions.HorizOffset = 14
    View3DOptions.Perspective = 20
    Align = alClient
    TabOrder = 1
    object Series1: TBarSeries
      ColorEachPoint = True
      Marks.Callout.Brush.Color = clBlack
      Marks.Visible = True
      BarStyle = bsCilinder
      Gradient.Direction = gdTopBottom
      XValues.Name = 'X'
      XValues.Order = loAscending
      YValues.Name = #38271#26465
      YValues.Order = loNone
    end
    object ChartTool1: TSurfaceNearestTool
      CellColor = clDefault
      ColumnColor = clDefault
      RowColor = clDefault
    end
  end
  object TeeCommander1: TTeeCommander
    Left = 0
    Top = 0
    Width = 371
    Height = 33
    Panel = Chart1
    Align = alTop
    ParentShowHint = False
    TabOrder = 2
    ChartEditor = ChartEditor1
  end
  object TeeOpenGL1: TTeeOpenGL
    AmbientLight = 8
    Light.Color = clGray
    Light.Visible = True
    Light.Position.X = -100.000000000000000000
    Light.Position.Y = -100.000000000000000000
    Light.Position.Z = -100.000000000000000000
    Light1.Color = clGray
    Light1.Visible = False
    Light1.Position.X = -100.000000000000000000
    Light1.Position.Y = -100.000000000000000000
    Light1.Position.Z = -100.000000000000000000
    Light2.Color = clGray
    Light2.Visible = False
    Light2.Position.X = -100.000000000000000000
    Light2.Position.Y = -100.000000000000000000
    Light2.Position.Z = -100.000000000000000000
    Shininess = 0.460000000000000000
    TeePanel = Chart1
    Left = 281
    Top = 32
  end
  object ChartEditor1: TChartEditor
    Chart = Chart1
    Left = 232
    Top = 32
  end
end