home *** CD-ROM | disk | FTP | other *** search
- object DepthAxisForm: TDepthAxisForm
- Left = 98
- Top = 33
- Width = 549
- Height = 486
- Caption = 'TeeChart Pro -- Using the new Depth Axis'
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- PixelsPerInch = 96
- Position = poScreenCenter
- Scaled = False
- OnCreate = FormCreate
- TextHeight = 13
- object Panel1: TPanel
- Left = 0
- Top = 0
- Width = 541
- Height = 105
- Align = alTop
- TabOrder = 0
- object Memo1: TMemo
- Left = 8
- Top = 8
- Width = 305
- Height = 89
- Lines.Strings = (
- 'The new "Depth" axis has the same properties and methods'
- 'than the regular Left, Top, Right and Bottom axes.'
- 'It can be used to show the Series names, or any Value labels '
- 'from Minimum to Maximum.'
- 'It'#39's intended to be used in 3D mode only.')
- TabOrder = 0
- end
- object Button1: TButton
- Left = 455
- Top = 12
- Width = 75
- Height = 25
- Caption = 'Close'
- Default = True
- TabOrder = 1
- OnClick = Button1Click
- end
- object CheckBox1: TCheckBox
- Left = 328
- Top = 16
- Width = 121
- Height = 17
- Caption = 'Show Depth axis'
- State = cbChecked
- TabOrder = 2
- OnClick = CheckBox1Click
- end
- object CheckBox2: TCheckBox
- Left = 328
- Top = 48
- Width = 129
- Height = 17
- Caption = 'Show Series names'
- State = cbChecked
- TabOrder = 3
- OnClick = CheckBox2Click
- end
- object CheckBox3: TCheckBox
- Left = 328
- Top = 72
- Width = 113
- Height = 17
- Caption = 'Show Grid lines'
- State = cbChecked
- TabOrder = 4
- OnClick = CheckBox3Click
- end
- end
- object TeeCommander1: TTeeCommander
- Left = 0
- Top = 105
- Width = 541
- Height = 33
- Panel = Chart1
- Align = alTop
- TabOrder = 1
- end
- object Chart1: TChart
- Left = 0
- Top = 138
- Width = 541
- Height = 321
- BackWall.Brush.Color = clWhite
- BackWall.Brush.Style = bsClear
- MarginRight = 10
- Title.Text.Strings = (
- 'TChart')
- Title.Visible = False
- BottomAxis.EndPosition = 100.000000000000000000
- Chart3DPercent = 45
- DepthAxis.LabelsFont.Color = clNavy
- DepthAxis.LabelsFont.Height = -13
- DepthAxis.LabelsFont.Name = 'Arial'
- DepthAxis.LabelsFont.Style = [fsBold, fsItalic]
- DepthAxis.Visible = True
- LeftAxis.EndPosition = 100.000000000000000000
- Legend.Visible = False
- RightAxis.EndPosition = 100.000000000000000000
- TopAxis.EndPosition = 100.000000000000000000
- View3DOptions.Elevation = 338
- View3DOptions.Orthogonal = False
- View3DOptions.Rotation = 350
- View3DOptions.Zoom = 88
- Align = alClient
- TabOrder = 2
- object Series1: TLineSeries
- Marks.ArrowLength = 8
- Marks.Visible = False
- SeriesColor = clRed
- Pointer.InflateMargins = True
- Pointer.Style = psRectangle
- Pointer.Visible = False
- XValues.DateTime = False
- XValues.Name = 'X'
- XValues.Multiplier = 1.000000000000000000
- XValues.Order = loAscending
- YValues.DateTime = False
- YValues.Name = 'Y'
- YValues.Multiplier = 1.000000000000000000
- YValues.Order = loNone
- end
- object Series2: TLineSeries
- Marks.ArrowLength = 8
- Marks.Visible = False
- SeriesColor = clGreen
- Pointer.InflateMargins = True
- Pointer.Style = psRectangle
- Pointer.Visible = False
- XValues.DateTime = False
- XValues.Name = 'X'
- XValues.Multiplier = 1.000000000000000000
- XValues.Order = loAscending
- YValues.DateTime = False
- YValues.Name = 'Y'
- YValues.Multiplier = 1.000000000000000000
- YValues.Order = loNone
- end
- object Series3: TLineSeries
- Marks.ArrowLength = 8
- Marks.Visible = False
- SeriesColor = clYellow
- Pointer.InflateMargins = True
- Pointer.Style = psRectangle
- Pointer.Visible = False
- XValues.DateTime = False
- XValues.Name = 'X'
- XValues.Multiplier = 1.000000000000000000
- XValues.Order = loAscending
- YValues.DateTime = False
- YValues.Name = 'Y'
- YValues.Multiplier = 1.000000000000000000
- YValues.Order = loNone
- end
- object Series4: TPoint3DSeries
- Active = False
- Marks.ArrowLength = 8
- Marks.Visible = False
- SeriesColor = clBlue
- DepthSize = 4.000000000000000000
- Pointer.InflateMargins = True
- Pointer.Style = psRectangle
- Pointer.Visible = True
- XValues.DateTime = False
- XValues.Name = 'X'
- XValues.Multiplier = 1.000000000000000000
- XValues.Order = loNone
- YValues.DateTime = False
- YValues.Name = 'Y'
- YValues.Multiplier = 1.000000000000000000
- YValues.Order = loNone
- end
- end
- end
-