object Form1: TForm1
  Left = 464
  Height = 459
  Top = 321
  Width = 529
  Caption = 'Form1'
  ClientHeight = 459
  ClientWidth = 529
  OnCreate = FormCreate
  Position = poScreenCenter
  LCLVersion = '1.1'
  object PageControl1: TPageControl
    Left = 0
    Height = 459
    Top = 0
    Width = 529
    ActivePage = tsBubble
    Align = alClient
    TabIndex = 0
    TabOrder = 0
    object tsBubble: TTabSheet
      Caption = 'Bubble'
      ClientHeight = 433
      ClientWidth = 521
      object chBubble: TChart
        Left = 0
        Height = 433
        Top = 0
        Width = 521
        AxisList = <        
          item
            Minors = <>
            Title.LabelFont.Orientation = 900
          end        
          item
            TickLength = 0
            Alignment = calBottom
            Marks.Attachment = maCenter
            Marks.Distance = 0
            Marks.LabelBrush.Style = bsSolid
            Minors = <>
          end>
        Foot.Brush.Color = clBtnFace
        Foot.Font.Color = clBlue
        Proportional = True
        Title.Brush.Color = clBtnFace
        Title.Font.Color = clBlue
        Title.Text.Strings = (
          'TAChart'
        )
        Align = alClient
        ParentColor = False
        object Chart1BubbleSeries1: TBubbleSeries
          Marks.Attachment = maCenter
          Marks.Distance = 0
          Marks.Format = '%0:.9g'
          Marks.Style = smsValue
          BubbleBrush.Color = clRed
          BubbleBrush.Style = bsDiagCross
          OverrideColor = [bocBrush, bocPen]
          Source = lcsBubble
        end
      end
    end
    object tsStacked: TTabSheet
      Caption = 'Stacked'
      ClientHeight = 433
      ClientWidth = 521
      object chStacked: TChart
        Left = 0
        Height = 391
        Top = 0
        Width = 521
        AxisList = <        
          item
            Minors = <>
            Title.LabelFont.Orientation = 900
          end        
          item
            Alignment = calBottom
            Minors = <>
          end>
        Depth = 10
        Foot.Brush.Color = clBtnFace
        Foot.Font.Color = clBlue
        Legend.GroupFont.Style = [fsBold]
        Legend.GroupTitles.Strings = (
          'Levels'
        )
        Legend.Visible = True
        Title.Brush.Color = clBtnFace
        Title.Font.Color = clBlue
        Title.Text.Strings = (
          'TAChart'
        )
        Align = alClient
        ParentColor = False
        object chStackedBarSeries1: TBarSeries
          Legend.GroupIndex = 0
          Legend.Multiplicity = lmStyle
          Active = False
          Marks.Format = '%0:.2g'
          Marks.LinkPen.Visible = False
          Marks.Style = smsCustom
          Marks.YIndex = -1
          ZPosition = 5
          BarBrush.Color = clRed
          Depth = 10
          MarkPositions = lmpInside
          Source = ccsStacked
          Styles = ChartStyles1
        end
        object chStackedLineSeries1: TLineSeries
          Legend.GroupIndex = 0
          Legend.Multiplicity = lmStyle
          Active = False
          Marks.Format = '%0:.2g'
          Marks.LinkPen.Visible = False
          Marks.Style = smsCustom
          Marks.YIndex = -1
          Depth = 10
          MarkPositions = lmpInside
          Source = ccsStacked
          Styles = ChartStyles1
        end
        object chStackedAreaSeries1: TAreaSeries
          Legend.GroupIndex = 0
          Legend.Multiplicity = lmStyle
          Marks.Format = '%0:.2g'
          Marks.LinkPen.Visible = False
          Marks.Style = smsCustom
          Marks.YIndex = -1
          ZPosition = 5
          AreaContourPen.Color = clGreen
          AreaContourPen.EndCap = pecSquare
          AreaContourPen.Width = 2
          Depth = 10
          MarkPositions = lmpInside
          Source = ccsStacked
          Styles = ChartStyles1
          UseZeroLevel = True
          ZeroLevel = 1
        end
      end
      object pnStackedControls: TPanel
        Left = 0
        Height = 42
        Top = 391
        Width = 521
        Align = alBottom
        BevelOuter = bvNone
        ClientHeight = 42
        ClientWidth = 521
        TabOrder = 1
        object rgStackedSeries: TRadioGroup
          Left = 0
          Height = 42
          Top = 0
          Width = 181
          Align = alLeft
          AutoFill = True
          Caption = ' Type '
          ChildSizing.LeftRightSpacing = 6
          ChildSizing.TopBottomSpacing = 6
          ChildSizing.HorizontalSpacing = 6
          ChildSizing.EnlargeHorizontal = crsHomogenousChildResize
          ChildSizing.EnlargeVertical = crsHomogenousChildResize
          ChildSizing.ShrinkHorizontal = crsScaleChilds
          ChildSizing.ShrinkVertical = crsScaleChilds
          ChildSizing.Layout = cclLeftToRightThenTopToBottom
          ChildSizing.ControlsPerLine = 3
          ClientHeight = 24
          ClientWidth = 177
          Columns = 3
          ItemIndex = 0
          Items.Strings = (
            'Area'
            'Bar'
            'Line'
          )
          OnClick = rgStackedSeriesClick
          TabOrder = 0
        end
        object cbPercentage: TCheckBox
          Left = 192
          Height = 17
          Top = 15
          Width = 75
          Caption = 'Percentage'
          OnChange = cbPercentageChange
          TabOrder = 1
        end
        object cgShowStackLevels: TCheckGroup
          Left = 297
          Height = 42
          Top = 0
          Width = 224
          Align = alRight
          AutoFill = True
          Caption = 'Show levels'
          ChildSizing.LeftRightSpacing = 6
          ChildSizing.TopBottomSpacing = 6
          ChildSizing.EnlargeHorizontal = crsHomogenousChildResize
          ChildSizing.EnlargeVertical = crsHomogenousChildResize
          ChildSizing.ShrinkHorizontal = crsScaleChilds
          ChildSizing.ShrinkVertical = crsScaleChilds
          ChildSizing.Layout = cclLeftToRightThenTopToBottom
          ChildSizing.ControlsPerLine = 3
          ClientHeight = 24
          ClientWidth = 220
          Columns = 3
          Items.Strings = (
            'red'
            'green'
            'blue'
          )
          OnItemClick = cgShowStackLevelsItemClick
          TabOrder = 2
          Data = {
            03000000030303
          }
        end
      end
    end
    object tsWhiskers: TTabSheet
      Caption = 'Box-and-whiskers'
      ClientHeight = 433
      ClientWidth = 521
      object chWhiskers: TChart
        Left = 0
        Height = 433
        Top = 0
        Width = 521
        AxisList = <        
          item
            Grid.Visible = False
            Minors = <>
            Title.LabelFont.Orientation = 900
          end        
          item
            Alignment = calBottom
            Minors = <>
          end>
        Foot.Brush.Color = clBtnFace
        Foot.Font.Color = clBlue
        Legend.SymbolWidth = 40
        Legend.Visible = True
        Title.Brush.Color = clBtnFace
        Title.Font.Color = clBlue
        Title.Text.Strings = (
          'TAChart'
        )
        Align = alClient
        ParentColor = False
        object chWhiskersBoxAndWhiskerSeries1: TBoxAndWhiskerSeries
          Title = 't1'
          BoxBrush.Color = clGreen
          BoxPen.Color = clMaroon
          MedianPen.Color = clLime
          MedianPen.Width = 2
          WhiskersPen.Color = clBlue
        end
      end
    end
    object tsOHLC: TTabSheet
      Caption = 'OHLC'
      ClientHeight = 433
      ClientWidth = 521
      object chOHLC: TChart
        Left = 0
        Height = 433
        Top = 0
        Width = 521
        AxisList = <        
          item
            Grid.Color = clGray
            TickLength = 0
            Minors = <>
            Title.LabelFont.Orientation = 900
          end        
          item
            Grid.Visible = False
            Alignment = calBottom
            Minors = <>
          end>
        ExpandPercentage = 5
        Foot.Brush.Color = clBtnFace
        Foot.Font.Color = clBlue
        Legend.Visible = True
        Title.Brush.Color = clBtnFace
        Title.Brush.Style = bsClear
        Title.Font.Color = clBlack
        Title.Font.Style = [fsBold]
        Title.Text.Strings = (
          'ACME Corporation'
        )
        Title.Visible = True
        Align = alClient
        Color = clSkyBlue
        ParentColor = False
        object chOHLCOpenHighLowCloseSeries1: TOpenHighLowCloseSeries
          Title = 'test'
          DownLinePen.Color = clRed
          DownLinePen.EndCap = pecSquare
          DownLinePen.Width = 2
          LinePen.Color = clBlue
          LinePen.EndCap = pecSquare
          LinePen.Width = 2
          TickWidth = 30
        end
      end
    end
  end
  object lcsBubble: TListChartSource
    DataPoints.Strings = (
      '10|50|3|?|'
      '20|30|1|?|'
      '35|20|9|?|'
      '50|40|6|$00FF00|'
      '60|50|15|?|'
      '80|60|2|?|'
    )
    YCount = 2
    left = 130
    top = 65
  end
  object rcsStacked: TRandomChartSource
    PointsNumber = 9
    RandSeed = 317042356
    XMax = 9
    XMin = 1
    YCount = 3
    YMax = 20
    YMin = 3
    left = 244
    top = 65
  end
  object ccsStacked: TCalculatedChartSource
    Origin = rcsStacked
    left = 244
    top = 136
  end
  object ChartStyles1: TChartStyles
    Styles = <    
      item
        Brush.Color = clRed
        Pen.Style = psDot
        Text = 'red'
      end    
      item
        Brush.Color = clLime
        Pen.Color = clGreen
        Pen.Width = 2
        Text = 'green'
      end    
      item
        Brush.Color = clBlue
        Text = 'blue'
      end>
    left = 244
    top = 208
  end
end