object Form1: TForm1
  Left = 475
  Height = 369
  Top = 336
  Width = 629
  Caption = 'Form1'
  ClientHeight = 369
  ClientWidth = 629
  OnCreate = FormCreate
  LCLVersion = '1.1'
  object Chart1: TChart
    Left = 0
    Height = 369
    Top = 0
    Width = 507
    AxisList = <    
      item
        Minors = <>
        Title.LabelFont.Orientation = 900
      end    
      item
        Alignment = calBottom
        Minors = <>
      end>
    Foot.Brush.Color = clBtnFace
    Foot.Font.Color = clBlue
    Margins.Bottom = 0
    Title.Brush.Color = clBtnFace
    Title.Font.Color = clBlue
    Title.Text.Strings = (
      'TAChart'
    )
    Align = alClient
    DoubleBuffered = True
    ParentColor = False
    object Chart1BarSeries1: TBarSeries
      BarBrush.Color = 2183646
      Source = ListChartSource1
    end
  end
  object Panel1: TPanel
    Left = 507
    Height = 369
    Top = 0
    Width = 122
    Align = alRight
    ClientHeight = 369
    ClientWidth = 122
    TabOrder = 1
    object rgMethod: TRadioGroup
      Left = 1
      Height = 97
      Top = 1
      Width = 120
      Align = alTop
      AutoFill = True
      Caption = ' Method '
      ChildSizing.LeftRightSpacing = 6
      ChildSizing.TopBottomSpacing = 6
      ChildSizing.EnlargeHorizontal = crsHomogenousChildResize
      ChildSizing.EnlargeVertical = crsHomogenousChildResize
      ChildSizing.ShrinkHorizontal = crsScaleChilds
      ChildSizing.ShrinkVertical = crsScaleChilds
      ChildSizing.Layout = cclLeftToRightThenTopToBottom
      ChildSizing.ControlsPerLine = 1
      ClientHeight = 79
      ClientWidth = 116
      ItemIndex = 0
      Items.Strings = (
        'Grow'
        'Add'
        'Add then grow'
      )
      OnClick = rgMethodClick
      TabOrder = 0
    end
    object btnStartStop: TButton
      Left = 9
      Height = 25
      Top = 144
      Width = 75
      Caption = 'Start / stop'
      OnClick = btnStartStopClick
      TabOrder = 1
    end
    object lblSkipped: TLabel
      Left = 9
      Height = 1
      Top = 340
      Width = 1
      ParentColor = False
    end
    object seTime: TSpinEdit
      Left = 9
      Height = 21
      Top = 108
      Width = 74
      Increment = 100
      MaxValue = 10000
      MinValue = 100
      OnChange = seTimeChange
      TabOrder = 2
      Value = 1000
    end
  end
  object ListChartSource1: TListChartSource
    DataPoints.Strings = (
      '1|2|?|'
      '2|3|?|'
      '3|5|?|'
      '4|6|?|'
      '5|9|?|'
      '6|7|?|'
      '7|8|?|'
    )
    left = 560
    top = 292
  end
end