lazarus/components/tachart/demo/panes-2/unit1.lfm

object Form1: TForm1
  Left = 394
  Height = 492
  Top = 225
  Width = 881
  Caption = 'Form1'
  ClientHeight = 492
  ClientWidth = 881
  OnCreate = FormCreate
  LCLVersion = '2.3.0.0'
  object Panel1: TPanel
    Left = 0
    Height = 492
    Top = 0
    Width = 141
    Align = alLeft
    AutoSize = True
    ClientHeight = 492
    ClientWidth = 141
    TabOrder = 0
    object CbLineAtDataOnly: TCheckBox
      AnchorSideLeft.Control = Panel1
      AnchorSideTop.Control = Panel1
      Left = 9
      Height = 19
      Top = 9
      Width = 107
      BorderSpacing.Around = 8
      Caption = 'Line at data only'
      Checked = True
      OnChange = CbLineAtDataOnlyChange
      State = cbChecked
      TabOrder = 0
    end
    object CbShowHorGrid: TCheckBox
      AnchorSideLeft.Control = Panel1
      AnchorSideTop.Control = CbBiDiMode
      AnchorSideTop.Side = asrBottom
      Left = 9
      Height = 19
      Top = 198
      Width = 62
      BorderSpacing.Around = 8
      Caption = 'hor grid'
      OnChange = CbShowGridChange
      TabOrder = 1
    end
    object CbShowArrow: TCheckBox
      AnchorSideLeft.Control = Panel1
      AnchorSideTop.Control = CbShowFrame
      AnchorSideTop.Side = asrBottom
      Left = 9
      Height = 19
      Top = 117
      Width = 52
      BorderSpacing.Around = 8
      Caption = 'Arrow'
      OnChange = CbShowArrowChange
      TabOrder = 2
    end
    object CbInverted: TCheckBox
      AnchorSideLeft.Control = Panel1
      AnchorSideTop.Control = CbShowArrow
      AnchorSideTop.Side = asrBottom
      Left = 9
      Height = 19
      Top = 144
      Width = 63
      BorderSpacing.Around = 8
      Caption = 'Inverted'
      OnChange = CbInvertedChange
      TabOrder = 3
    end
    object CbBiDiMode: TCheckBox
      AnchorSideLeft.Control = Panel1
      AnchorSideTop.Control = CbInverted
      AnchorSideTop.Side = asrBottom
      Left = 9
      Height = 19
      Top = 171
      Width = 83
      BorderSpacing.Around = 8
      Caption = 'right-to-left'
      OnChange = CbBiDiModeChange
      TabOrder = 4
    end
    object CbMarksAtDataOnly: TCheckBox
      AnchorSideLeft.Control = Panel1
      AnchorSideTop.Control = CbLineAtDataOnly
      AnchorSideTop.Side = asrBottom
      Left = 9
      Height = 19
      Top = 36
      Width = 117
      BorderSpacing.Around = 8
      Caption = 'Marks at data only'
      Checked = True
      OnChange = CbMarksAtDataOnlyChange
      State = cbChecked
      TabOrder = 5
    end
    object Label1: TLabel
      AnchorSideLeft.Control = Panel1
      AnchorSideTop.Control = CbShowVertGrid
      AnchorSideTop.Side = asrBottom
      Left = 9
      Height = 15
      Top = 268
      Width = 36
      BorderSpacing.Left = 8
      BorderSpacing.Top = 24
      Caption = 'Range:'
    end
    object CbUseMax: TCheckBox
      AnchorSideLeft.Control = Panel1
      AnchorSideTop.Control = Label1
      AnchorSideTop.Side = asrBottom
      Left = 9
      Height = 19
      Top = 287
      Width = 62
      BorderSpacing.Left = 8
      BorderSpacing.Top = 4
      Caption = 'UseMax'
      OnChange = CbUseMaxChange
      TabOrder = 6
    end
    object CbUseMin: TCheckBox
      AnchorSideLeft.Control = Panel1
      AnchorSideTop.Control = CbUseMax
      AnchorSideTop.Side = asrBottom
      Left = 9
      Height = 19
      Top = 310
      Width = 60
      BorderSpacing.Left = 8
      BorderSpacing.Top = 4
      Caption = 'UseMin'
      OnChange = CbUseMinChange
      TabOrder = 7
    end
    object CbGrouped: TCheckBox
      AnchorSideLeft.Control = Panel1
      AnchorSideTop.Control = CbMarksAtDataOnly
      AnchorSideTop.Side = asrBottom
      Left = 9
      Height = 19
      Top = 63
      Width = 66
      BorderSpacing.Around = 8
      Caption = 'Grouped'
      OnChange = CbGroupedChange
      TabOrder = 8
    end
    object CbShowFrame: TCheckBox
      AnchorSideLeft.Control = Panel1
      AnchorSideTop.Control = CbGrouped
      AnchorSideTop.Side = asrBottom
      Left = 9
      Height = 19
      Top = 90
      Width = 53
      BorderSpacing.Around = 8
      Caption = 'Frame'
      Checked = True
      OnChange = CbShowFrameChange
      State = cbChecked
      TabOrder = 9
    end
    object CbShowVertGrid: TCheckBox
      AnchorSideLeft.Control = Panel1
      AnchorSideTop.Control = CbShowHorGrid
      AnchorSideTop.Side = asrBottom
      Left = 9
      Height = 19
      Top = 225
      Width = 64
      BorderSpacing.Around = 8
      Caption = 'vert grid'
      OnChange = CbShowGridChange
      TabOrder = 10
    end
    object Label2: TLabel
      AnchorSideLeft.Control = Panel1
      AnchorSideTop.Control = LblXExtentIgnored
      AnchorSideTop.Side = asrBottom
      AnchorSideRight.Control = Panel1
      AnchorSideRight.Side = asrBottom
      Left = 9
      Height = 15
      Top = 426
      Width = 131
      Anchors = [akTop, akLeft, akRight]
      BorderSpacing.Left = 8
      BorderSpacing.Top = 24
      Caption = 'Drag the dashed lines...'
      WordWrap = True
    end
    object CheckBox1: TCheckBox
      AnchorSideLeft.Control = Panel1
      AnchorSideTop.Control = CbUseMin
      AnchorSideTop.Side = asrBottom
      Left = 9
      Height = 19
      Top = 353
      Width = 131
      BorderSpacing.Left = 8
      BorderSpacing.Top = 24
      Caption = 'TFuncSeries in center'
      OnChange = CheckBox1Change
      TabOrder = 11
    end
    object LblXExtentIgnored: TLabel
      AnchorSideLeft.Control = Panel1
      AnchorSideTop.Control = CheckBox1
      AnchorSideTop.Side = asrBottom
      AnchorSideRight.Control = Panel1
      AnchorSideRight.Side = asrBottom
      Left = 9
      Height = 30
      Top = 372
      Width = 123
      Anchors = [akTop, akLeft, akRight]
      BorderSpacing.Left = 8
      BorderSpacing.Right = 8
      Caption = '(x extent ignored - see docs)'
      WordWrap = True
    end
  end
  object PageControl1: TPageControl
    Left = 141
    Height = 492
    Top = 0
    Width = 740
    ActivePage = TabSheet1
    Align = alClient
    TabIndex = 0
    TabOrder = 1
    OnChange = PageControl1Change
    OnChanging = PageControl1Changing
    object TabSheet1: TTabSheet
      Caption = 'Horizontal panes'
      ClientHeight = 464
      ClientWidth = 732
      object Chart1: TChart
        Left = 0
        Height = 464
        Top = 0
        Width = 732
        AxisList = <        
          item
            Grid.Color = clGray
            Grid.Visible = False
            Alignment = calBottom
            AxisPen.Visible = True
            Marks.LabelBrush.Style = bsClear
            Minors = <>
            Title.Visible = True
            Title.Caption = 'x axis'
            Title.LabelBrush.Style = bsClear
          end        
          item
            Grid.Color = clGray
            Grid.Visible = False
            Intervals.MaxLength = 40
            TickColor = clBlue
            AtDataOnly = True
            AxisPen.Color = clBlue
            AxisPen.Visible = True
            Marks.LabelFont.Color = clBlue
            Marks.AtDataOnly = True
            Marks.LabelBrush.Style = bsClear
            Minors = <>
            Range.Max = 5
            Range.Min = -5
            Title.LabelFont.Color = clBlue
            Title.LabelFont.Orientation = 900
            Title.Visible = True
            Title.Caption = 'y1 axis'
            Title.LabelBrush.Style = bsClear
            Title.PositionOnMarks = True
            Transformations = ChartAxisTransformations1
          end        
          item
            Grid.Color = clGray
            Grid.Visible = False
            TickColor = clRed
            AtDataOnly = True
            AxisPen.Color = clRed
            AxisPen.Visible = True
            Marks.LabelFont.Color = clRed
            Marks.AtDataOnly = True
            Marks.LabelBrush.Style = bsClear
            Minors = <>
            Range.Max = 20
            Title.LabelFont.Color = clRed
            Title.LabelFont.Orientation = 900
            Title.Visible = True
            Title.Caption = 'y2 axis'
            Title.LabelBrush.Style = bsClear
            Title.PositionOnMarks = True
            Transformations = ChartAxisTransformations2
          end        
          item
            Grid.Color = clGray
            Grid.Visible = False
            AtDataOnly = True
            AxisPen.Color = clFuchsia
            AxisPen.Visible = True
            Marks.LabelFont.Color = clFuchsia
            Marks.AtDataOnly = True
            Marks.LabelBrush.Style = bsClear
            Minors = <>
            Range.Max = 100
            Range.Min = -100
            Title.LabelFont.Color = clFuchsia
            Title.LabelFont.Orientation = 900
            Title.Visible = True
            Title.Caption = 'y3 axis'
            Title.LabelBrush.Style = bsClear
            Title.PositionOnMarks = True
            Transformations = ChartAxisTransformations3
          end>
        BackColor = clNone
        Extent.UseYMax = True
        Extent.UseYMin = True
        Extent.YMax = 10
        Foot.Brush.Color = clBtnFace
        Foot.Font.Color = clBlue
        Title.Brush.Color = clBtnFace
        Title.Font.Color = clBlue
        Title.Text.Strings = (
          'TAChart'
        )
        Toolset = ChartToolset1
        Align = alClient
        Color = clNone
        object Chart1LineSeries1: TLineSeries
          AxisIndexX = 0
          AxisIndexY = 1
          LinePen.Color = clBlue
          Source = RandomChartSource11
        end
        object Chart1LineSeries2: TLineSeries
          AxisIndexX = 0
          AxisIndexY = 2
          LinePen.Color = clRed
          Source = RandomChartSource12
        end
        object Chart1LineSeries3: TLineSeries
          AxisIndexX = 0
          AxisIndexY = 3
          LinePen.Color = clFuchsia
          Source = RandomChartSource13
        end
        object Chart1LineSeries4: TLineSeries
          AxisIndexX = 0
          AxisIndexY = 3
          LinePen.Color = clFuchsia
          LinePen.Style = psDot
          Source = RandomChartSource14
        end
        object Chart1ConstantLine1: TConstantLine
          Pen.Color = clBlue
          Pen.Style = psDash
          Position = 2
        end
        object Chart1ConstantLine2: TConstantLine
          Pen.Color = clRed
          Pen.Style = psDash
          Position = 3
        end
        object Chart1ConstantLine3: TConstantLine
          Pen.Color = clRed
          Pen.Style = psDash
          Position = 5
        end
        object Chart1ConstantLine4: TConstantLine
          Pen.Color = clFuchsia
          Pen.Style = psDash
          Position = 6
        end
        object Chart1FuncSeries2: TFuncSeries
          Active = False
          Extent.UseYMax = True
          Extent.UseYMin = True
          Extent.YMax = 1
          Extent.YMin = -1
          AxisIndexX = 0
          AxisIndexY = 2
          ExtentAutoY = True
          Pen.Color = clRed
          Step = 1
          OnCalculate = Chart1FuncSeries2Calculate
        end
      end
    end
    object TabSheet2: TTabSheet
      Caption = 'Vertical panes'
      ClientHeight = 464
      ClientWidth = 732
      object Chart2: TChart
        Left = 0
        Height = 464
        Top = 0
        Width = 732
        AxisList = <        
          item
            Grid.Color = clGray
            Grid.Visible = False
            AxisPen.Visible = True
            Marks.LabelBrush.Style = bsClear
            Minors = <>
            Title.LabelFont.Orientation = 900
            Title.Visible = True
            Title.Caption = 'y axis'
            Title.LabelBrush.Style = bsClear
          end        
          item
            Grid.Color = clGray
            Grid.Visible = False
            TickColor = clBlue
            Alignment = calBottom
            AtDataOnly = True
            AxisPen.Color = clBlue
            AxisPen.Visible = True
            Marks.LabelFont.Color = clBlue
            Marks.AtDataOnly = True
            Marks.LabelBrush.Style = bsClear
            Minors = <>
            Range.Max = 5
            Range.Min = -5
            Title.LabelFont.Color = clBlue
            Title.Visible = True
            Title.Caption = 'x1 axis'
            Title.LabelBrush.Style = bsClear
            Title.PositionOnMarks = True
            Transformations = ChartAxisTransformations1
          end        
          item
            Grid.Color = clGray
            Grid.Visible = False
            TickColor = clRed
            Alignment = calBottom
            AtDataOnly = True
            AxisPen.Color = clRed
            AxisPen.Visible = True
            Marks.LabelFont.Color = clRed
            Marks.AtDataOnly = True
            Marks.LabelBrush.Style = bsClear
            Minors = <>
            Range.Max = 20
            Title.LabelFont.Color = clRed
            Title.Visible = True
            Title.Caption = 'x2 axis'
            Title.LabelBrush.Style = bsClear
            Title.PositionOnMarks = True
            Transformations = ChartAxisTransformations2
          end        
          item
            Grid.Color = clGray
            Grid.Visible = False
            Alignment = calBottom
            AtDataOnly = True
            AxisPen.Color = clFuchsia
            AxisPen.Visible = True
            Marks.LabelFont.Color = clFuchsia
            Marks.AtDataOnly = True
            Marks.LabelBrush.Style = bsClear
            Minors = <>
            Range.Max = 100
            Range.Min = -100
            Title.LabelFont.Color = clFuchsia
            Title.Visible = True
            Title.Caption = 'x3 axis'
            Title.LabelBrush.Style = bsClear
            Title.PositionOnMarks = True
            Transformations = ChartAxisTransformations3
          end>
        BackColor = clNone
        Extent.UseXMax = True
        Extent.UseXMin = True
        Extent.XMax = 10
        Foot.Brush.Color = clBtnFace
        Foot.Font.Color = clBlue
        Title.Brush.Color = clBtnFace
        Title.Font.Color = clBlue
        Title.Text.Strings = (
          'TAChart'
        )
        Toolset = ChartToolset2
        Align = alClient
        Color = clNone
        object Chart2LineSeries1: TLineSeries
          AxisIndexX = 1
          AxisIndexY = 0
          LinePen.Color = clBlue
          Source = RandomChartSource21
        end
        object Chart2LineSeries2: TLineSeries
          AxisIndexX = 2
          AxisIndexY = 0
          LinePen.Color = clRed
          Source = RandomChartSource22
        end
        object Chart2LineSeries3: TLineSeries
          AxisIndexX = 3
          AxisIndexY = 0
          LinePen.Color = clFuchsia
          Source = RandomChartSource23
        end
        object Chart2LineSeries4: TLineSeries
          AxisIndexX = 3
          AxisIndexY = 0
          LinePen.Color = clFuchsia
          LinePen.Style = psDot
          Source = RandomChartSource24
        end
        object Chart2ConstantLine1: TConstantLine
          LineStyle = lsVertical
          Pen.Color = clBlue
          Pen.Style = psDash
          Position = 2
        end
        object Chart2ConstantLine2: TConstantLine
          LineStyle = lsVertical
          Pen.Color = clRed
          Pen.Style = psDash
          Position = 3
        end
        object Chart2ConstantLine3: TConstantLine
          LineStyle = lsVertical
          Pen.Color = clRed
          Pen.Style = psDash
          Position = 5
        end
        object Chart2ConstantLine4: TConstantLine
          LineStyle = lsVertical
          Pen.Color = clFuchsia
          Pen.Style = psDash
          Position = 6
        end
        object Chart2FuncSeries2: TFuncSeries
          Active = False
          Extent.UseXMax = True
          Extent.UseXMin = True
          Extent.UseYMax = True
          Extent.UseYMin = True
          Extent.XMax = 1
          Extent.YMax = 1
          AxisIndexX = 2
          AxisIndexY = 0
          Pen.Color = clRed
          Step = 1
          OnCalculate = Chart2FuncSeries2Calculate
        end
      end
    end
  end
  object RandomChartSource11: TRandomChartSource
    PointsNumber = 10
    RandSeed = 2088531169
    XMax = 1
    YMax = 1
    Left = 200
    Top = 48
  end
  object RandomChartSource12: TRandomChartSource
    PointsNumber = 10
    RandSeed = 2088635735
    XMax = 1
    YMax = 10
    Left = 200
    Top = 115
  end
  object RandomChartSource13: TRandomChartSource
    PointsNumber = 10
    RandSeed = 2088693796
    XMax = 1
    YMax = 10
    Left = 200
    Top = 188
  end
  object ChartAxisTransformations1: TChartAxisTransformations
    Left = 776
    Top = 48
    object ChartAxisTransformations1AutoScaleAxisTransform1: TAutoScaleAxisTransform
      MaxValue = 2
    end
  end
  object ChartAxisTransformations2: TChartAxisTransformations
    Left = 776
    Top = 115
    object ChartAxisTransformations2AutoScaleAxisTransform1: TAutoScaleAxisTransform
      MaxValue = 5
      MinValue = 3
    end
  end
  object ChartAxisTransformations3: TChartAxisTransformations
    Left = 776
    Top = 188
    object ChartAxisTransformations3AutoScaleAxisTransform1: TAutoScaleAxisTransform
      MaxValue = 10
      MinValue = 6
    end
  end
  object RandomChartSource14: TRandomChartSource
    PointsNumber = 5
    RandSeed = 999856828
    XMax = 1
    YMax = 100
    Left = 200
    Top = 256
  end
  object RandomChartSource21: TRandomChartSource
    PointsNumber = 10
    RandSeed = 2088531169
    XMax = 1
    YMax = 1
    Left = 336
    Top = 48
  end
  object RandomChartSource22: TRandomChartSource
    PointsNumber = 10
    RandSeed = 2088635735
    XMax = 10
    YMax = 1
    Left = 336
    Top = 115
  end
  object RandomChartSource23: TRandomChartSource
    PointsNumber = 10
    RandSeed = 2088693796
    XMax = 10
    YMax = 1
    Left = 336
    Top = 188
  end
  object RandomChartSource24: TRandomChartSource
    PointsNumber = 5
    RandSeed = 999856828
    XMax = 100
    YMax = 1
    Left = 336
    Top = 256
  end
  object ChartToolset1: TChartToolset
    Left = 200
    Top = 392
    object ChartToolset1DataPointDragTool1: TDataPointDragTool
      Shift = [ssLeft]
      OnAfterMouseMove = DataPointDragTool_AfterMouseMove
      AffectedSeries = '4,5,6,7'
      ActiveCursor = crSizeNS
    end
  end
  object ChartToolset2: TChartToolset
    Left = 336
    Top = 392
    object ChartToolset2DataPointDragTool1: TDataPointDragTool
      Shift = [ssLeft]
      OnAfterMouseMove = DataPointDragTool_AfterMouseMove
      AffectedSeries = '4,5,6,7'
      ActiveCursor = crSizeWE
    end
  end
end