object Form1: TForm1
  Left = 461
  Height = 430
  Top = 151
  Width = 592
  Caption = 'Form1'
  ClientHeight = 430
  ClientWidth = 592
  Position = poScreenCenter
  LCLVersion = '2.1.0.0'
  object pcMain: TPageControl
    Left = 0
    Height = 364
    Top = 0
    Width = 592
    ActivePage = tsBar
    Align = alClient
    TabIndex = 0
    TabOrder = 0
    object tsBar: TTabSheet
      Caption = 'Bar'
      ClientHeight = 336
      ClientWidth = 584
      object Chart1: TChart
        Left = 0
        Height = 336
        Top = 0
        Width = 584
        AxisList = <        
          item
            TickLength = 0
            Marks.Distance = 4
            Marks.LabelBrush.Color = clSkyBlue
            Minors = <>
            Title.LabelFont.Orientation = 900
            Title.Visible = True
            Title.Caption = 'Left axis title'
          end        
          item
            Alignment = calBottom
            AxisPen.Visible = True
            Marks.LabelBrush.Color = clSkyBlue
            Minors = <>
            Title.Visible = True
            Title.Caption = 'Bottom axis title'
            Title.Frame.Style = psSolid
            Title.LabelBrush.Style = bsClear
          end>
        Foot.Brush.Color = clBtnFace
        Foot.Font.Color = clBlue
        Frame.Visible = False
        Margins.Bottom = 0
        Title.Brush.Color = clBtnFace
        Title.Font.Color = clBlue
        Title.Text.Strings = (
          'TAChart'
        )
        Align = alClient
        object Chart1BarSeries1: TBarSeries
          Marks.Margins.Left = 8
          Marks.Margins.Top = 5
          Marks.Margins.Right = 8
          Marks.Margins.Bottom = 5
          Marks.Arrow.BaseLength = 3
          Marks.Arrow.Length = 9
          Marks.Arrow.Visible = True
          Marks.Arrow.Width = 4
          Marks.Format = '%1:.2f%%'
          Marks.Frame.Color = 31097
          Marks.Frame.Width = 2
          Marks.Style = smsPercent
          BarBrush.Color = 1410280
          Source = RandomChartSource1
        end
      end
    end
    object Multiline: TTabSheet
      Caption = 'Multiline'
      ClientHeight = 336
      ClientWidth = 584
      object ChartMulti: TChart
        Left = 0
        Height = 336
        Top = 0
        Width = 584
        AxisList = <        
          item
            Marks.Alignment = taCenter
            Marks.LabelFont.Orientation = 900
            Marks.Frame.Style = psSolid
            Marks.LabelBrush.Style = bsClear
            Minors = <>
            Title.LabelFont.Orientation = 900
            Title.LabelBrush.Style = bsClear
            OnMarkToText = ChartMultiAxisList1MarkToText
          end        
          item
            Alignment = calBottom
            Marks.Frame.Style = psSolid
            Marks.LabelBrush.Style = bsClear
            Minors = <>
            Title.Visible = True
            Title.Caption = 'test'
            Title.LabelBrush.Style = bsClear
            OnMarkToText = ChartMultiAxisList1MarkToText
          end>
        Foot.Brush.Color = clBtnFace
        Foot.Font.Color = clBlue
        Foot.Text.Strings = (
          'TAChart'
        )
        Title.Brush.Color = clBtnFace
        Title.Brush.Style = bsClear
        Title.Font.Color = clBlue
        Title.Text.Strings = (
          'Chart long'
          'title'
        )
        Title.Visible = True
        Align = alClient
        object ChartMultiLineSeries1: TLineSeries
          Source = RandomChartSource1
        end
      end
    end
  end
  object pnlControls: TPanel
    Left = 0
    Height = 66
    Top = 364
    Width = 592
    Align = alBottom
    AutoSize = True
    BevelOuter = bvNone
    ClientHeight = 66
    ClientWidth = 592
    TabOrder = 1
    object cbHideOverlapping: TCheckBox
      AnchorSideLeft.Control = gbAngles
      AnchorSideLeft.Side = asrBottom
      AnchorSideTop.Control = pnlControls
      Left = 420
      Height = 19
      Top = 8
      Width = 144
      BorderSpacing.Left = 16
      BorderSpacing.Top = 8
      Caption = 'Hide overlapping labels'
      OnChange = cbHideOverlappingChange
      TabOrder = 0
    end
    object gbAngles: TGroupBox
      Left = 0
      Height = 66
      Top = 0
      Width = 404
      Align = alLeft
      AutoSize = True
      Caption = ' Angles '
      ClientHeight = 46
      ClientWidth = 400
      TabOrder = 1
      object seAxisAngle: TSpinEdit
        AnchorSideLeft.Control = lblAxisAngle
        AnchorSideLeft.Side = asrBottom
        AnchorSideTop.Control = gbAngles
        Left = 37
        Height = 23
        Top = 8
        Width = 50
        BorderSpacing.Left = 8
        BorderSpacing.Top = 8
        BorderSpacing.Bottom = 8
        Increment = 5
        MaxValue = 360
        MinValue = -360
        OnChange = seAxisAngleChange
        TabOrder = 0
      end
      object lblAxisAngle: TLabel
        AnchorSideLeft.Control = gbAngles
        AnchorSideTop.Control = seAxisAngle
        AnchorSideTop.Side = asrCenter
        Left = 8
        Height = 15
        Top = 12
        Width = 21
        BorderSpacing.Left = 8
        Caption = 'Axis'
        ParentColor = False
      end
      object lblSeriesAngle: TLabel
        AnchorSideLeft.Control = seAxisAngle
        AnchorSideLeft.Side = asrBottom
        AnchorSideTop.Control = seSeriesAngle
        AnchorSideTop.Side = asrCenter
        Left = 103
        Height = 15
        Top = 12
        Width = 30
        BorderSpacing.Left = 16
        Caption = 'Series'
        ParentColor = False
      end
      object seSeriesAngle: TSpinEdit
        AnchorSideLeft.Control = lblSeriesAngle
        AnchorSideLeft.Side = asrBottom
        AnchorSideTop.Control = gbAngles
        Left = 141
        Height = 23
        Top = 8
        Width = 50
        BorderSpacing.Left = 8
        BorderSpacing.Top = 8
        BorderSpacing.Bottom = 8
        Increment = 5
        MaxValue = 360
        MinValue = -360
        OnChange = seSeriesAngleChange
        TabOrder = 1
      end
      object lblTitleAngle: TLabel
        AnchorSideLeft.Control = seSeriesAngle
        AnchorSideLeft.Side = asrBottom
        AnchorSideTop.Control = seTitleAngle
        AnchorSideTop.Side = asrCenter
        Left = 207
        Height = 15
        Top = 12
        Width = 23
        BorderSpacing.Left = 16
        Caption = 'Title'
        ParentColor = False
      end
      object seTitleAngle: TSpinEdit
        AnchorSideLeft.Control = lblTitleAngle
        AnchorSideLeft.Side = asrBottom
        AnchorSideTop.Control = gbAngles
        Left = 238
        Height = 23
        Top = 8
        Width = 50
        BorderSpacing.Left = 8
        BorderSpacing.Top = 8
        BorderSpacing.Bottom = 8
        Increment = 5
        MaxValue = 360
        MinValue = -360
        OnChange = seTitleAngleChange
        TabOrder = 2
      end
      object seCalloutAngle: TSpinEdit
        AnchorSideLeft.Control = lblCalloutAngle
        AnchorSideLeft.Side = asrBottom
        AnchorSideTop.Control = gbAngles
        Left = 350
        Height = 23
        Top = 8
        Width = 50
        BorderSpacing.Left = 8
        BorderSpacing.Top = 8
        BorderSpacing.Bottom = 8
        Increment = 5
        MaxValue = 120
        OnChange = seCalloutAngleChange
        TabOrder = 3
      end
      object lblCalloutAngle: TLabel
        AnchorSideLeft.Control = seTitleAngle
        AnchorSideLeft.Side = asrBottom
        AnchorSideTop.Control = seCalloutAngle
        AnchorSideTop.Side = asrCenter
        Left = 304
        Height = 15
        Top = 12
        Width = 38
        BorderSpacing.Left = 16
        Caption = 'Callout'
        ParentColor = False
      end
    end
    object cbShape: TComboBox
      AnchorSideLeft.Control = cbHideOverlapping
      AnchorSideTop.Control = cbHideOverlapping
      AnchorSideTop.Side = asrBottom
      Left = 420
      Height = 23
      Top = 35
      Width = 160
      BorderSpacing.Top = 8
      BorderSpacing.Bottom = 8
      ItemHeight = 15
      ItemIndex = 0
      Items.Strings = (
        'Rectangle'
        'Ellipse'
        'Rounded corners'
        'Rounded sides'
        'User-defined'
      )
      OnChange = cbShapeChange
      Style = csDropDownList
      TabOrder = 2
      Text = 'Rectangle'
    end
  end
  object RandomChartSource1: TRandomChartSource
    PointsNumber = 15
    RandSeed = 567673250
    XMax = 15
    XMin = 0
    YMax = 15
    YMin = 10
    left = 342
    top = 94
  end
end