object Form1: TForm1
  Left = 280
  Height = 334
  Top = 130
  Width = 725
  Caption = 'Form1'
  ClientHeight = 334
  ClientWidth = 725
  LCLVersion = '2.3.0.0'
  object Chart1: TChart
    Left = 0
    Height = 296
    Top = 0
    Width = 601
    AxisList = <    
      item
        Grid.Color = clSilver
        Grid.Style = psSolid
        Marks.LabelBrush.Style = bsClear
        Minors = <>
        Title.LabelFont.Orientation = 900
        Title.LabelBrush.Style = bsClear
      end    
      item
        Grid.Visible = False
        Alignment = calBottom
        Marks.LabelBrush.Style = bsClear
        Minors = <>
        Title.LabelBrush.Style = bsClear
      end>
    BackColor = clWhite
    Foot.Brush.Color = clBtnFace
    Foot.Font.Color = clBlue
    Legend.Visible = True
    Title.Brush.Color = clBtnFace
    Title.Font.Color = clBlue
    Title.Text.Strings = (
      'TAChart'
    )
    Align = alClient
    object Chart1BarSeries1: TBarSeries
      Legend.Multiplicity = lmStyle
      BarBrush.Color = clRed
      Source = CalculatedChartSource1
      Styles = ChartStyles1
    end
  end
  object Panel1: TPanel
    Left = 0
    Height = 38
    Top = 296
    Width = 725
    Align = alBottom
    BevelOuter = bvNone
    ClientHeight = 38
    ClientWidth = 725
    TabOrder = 1
    object BtnAddBar: TButton
      AnchorSideLeft.Control = Panel1
      AnchorSideTop.Control = Panel1
      AnchorSideTop.Side = asrCenter
      Left = 8
      Height = 25
      Top = 7
      Width = 68
      AutoSize = True
      BorderSpacing.Left = 8
      Caption = 'Add bar'
      OnClick = BtnAddBarClick
      TabOrder = 0
    end
    object BtnAddLevel: TButton
      AnchorSideLeft.Control = BtnAddBar
      AnchorSideLeft.Side = asrBottom
      AnchorSideTop.Control = Panel1
      AnchorSideTop.Side = asrCenter
      Left = 84
      Height = 25
      Top = 7
      Width = 75
      AutoSize = True
      BorderSpacing.Left = 8
      Caption = 'Add level'
      OnClick = BtnAddLevelClick
      TabOrder = 1
    end
    object CbPercent: TCheckBox
      AnchorSideLeft.Control = BtnAddLevel
      AnchorSideLeft.Side = asrBottom
      AnchorSideTop.Control = Panel1
      AnchorSideTop.Side = asrCenter
      Left = 167
      Height = 19
      Top = 10
      Width = 48
      BorderSpacing.Left = 8
      Caption = '100%'
      OnChange = CbPercentChange
      TabOrder = 2
    end
    object BtnDelete: TButton
      AnchorSideTop.Control = Panel1
      AnchorSideTop.Side = asrCenter
      AnchorSideRight.Control = Panel1
      AnchorSideRight.Side = asrBottom
      Left = 612
      Height = 25
      Top = 7
      Width = 105
      Anchors = [akTop, akRight]
      AutoSize = True
      BorderSpacing.Right = 8
      Caption = 'Delete selected'
      Enabled = False
      OnClick = BtnDeleteClick
      TabOrder = 3
    end
  end
  object ListBox1: TListBox
    Left = 609
    Height = 280
    Top = 8
    Width = 108
    Align = alRight
    BorderSpacing.Around = 8
    ItemHeight = 0
    TabOrder = 2
  end
  object ListChartSource1: TListChartSource
    Left = 117
    Top = 57
  end
  object CalculatedChartSource1: TCalculatedChartSource
    Origin = ListChartSource1
    Left = 116
    Top = 112
  end
  object ChartStyles1: TChartStyles
    Styles = <>
    Left = 268
    Top = 58
  end
end