object Form1: TForm1
  Left = 343
  Height = 333
  Top = 184
  Width = 533
  Caption = 'TAChart axis demo'
  ClientHeight = 333
  ClientWidth = 533
  OnCreate = FormCreate
  Position = poScreenCenter
  LCLVersion = '0.9.29'
  object PageControl1: TPageControl
    Left = 0
    Height = 333
    Top = 0
    Width = 533
    ActivePage = lsLinear
    Align = alClient
    TabIndex = 0
    TabOrder = 0
    object lsLinear: TTabSheet
      Caption = 'Linear transform'
      ClientHeight = 307
      ClientWidth = 525
      object ChartT: TChart
        Left = 0
        Height = 278
        Top = 0
        Width = 525
        AxisList = <        
          item
            Grid.Visible = False
            Marks.LabelFont.Color = clRed
            Marks.AtDataOnly = True
            TickColor = clRed
            Title.LabelFont.Color = clRed
            Title.LabelFont.Orientation = 900
            Title.Visible = True
            Title.Caption = 'Summer temperature, °C'
            Transformations = catTAuto
          end        
          item
            Alignment = calBottom
            Title.Visible = True
            Title.Caption = 'Year'
          end        
          item
            Alignment = calRight
            Grid.Visible = False
            Marks.Distance = 4
            Marks.LabelFont.Color = clBlue
            Marks.AtDataOnly = True
            TickColor = clBlue
            Title.LabelFont.Color = clBlue
            Title.LabelFont.Orientation = 900
            Title.Visible = True
            Title.Caption = 'Winter temperature, °F'
            Transformations = catT
          end>
        Foot.Brush.Color = clBtnFace
        Foot.Font.Color = clBlue
        Frame.Visible = False
        Title.Brush.Color = clBtnFace
        Title.Font.Color = clBlue
        Title.Text.Strings = (
          'TAChart'
        )
        Align = alClient
        ParentColor = False
        object ChartTSummer: TLineSeries
          AxisIndexY = 0
          LinePen.Color = clRed
          LinePen.Width = 2
          Source = rcsTSummer
        end
        object ChartTWinterLine: TLineSeries
          AxisIndexY = 2
          LinePen.Color = clBlue
          LinePen.Width = 2
          Source = rcsTWinter
        end
        object ChartTWinterBar: TBarSeries
          AxisIndexY = 2
          BarBrush.Color = clBlue
          BarBrush.Style = bsDiagCross
          Source = rcsTWinter
        end
      end
      object pnlAutoControls: TPanel
        Left = 0
        Height = 29
        Top = 278
        Width = 525
        Align = alBottom
        ClientHeight = 29
        ClientWidth = 525
        TabOrder = 1
        object cbAuto: TCheckBox
          Left = 4
          Height = 17
          Top = 5
          Width = 70
          Caption = 'Auto scale'
          OnChange = cbAutoChange
          TabOrder = 0
        end
      end
    end
    object tsLog: TTabSheet
      Caption = 'Logarithm transform'
      ClientHeight = 307
      ClientWidth = 525
      object ChartLog: TChart
        Left = 0
        Height = 278
        Top = 0
        Width = 525
        AxisList = <        
          item
            Title.LabelFont.Orientation = 900
            Title.Visible = True
            Title.Caption = 'Left'
            Transformations = catLog
          end        
          item
            Alignment = calBottom
            Title.Distance = 0
            Title.Visible = True
            Title.Caption = 'Bottom'
          end        
          item
            Alignment = calRight
            Grid.Visible = False
            Title.LabelFont.Orientation = 900
            Title.Visible = True
            Title.Caption = 'Right 1'
          end        
          item
            Alignment = calTop
            Inverted = True
            Title.Caption = 'Top'
          end>
        Foot.Brush.Color = clBtnFace
        Foot.Font.Color = clBlue
        Title.Brush.Color = clBtnFace
        Title.Font.Color = clBlue
        Title.Text.Strings = (
          'TAChart'
        )
        Align = alClient
        ParentColor = False
        object clsLogPoints: TLineSeries
          AxisIndexY = 0
          LineType = ltNone
          Pointer.Brush.Color = clMaroon
          ShowPoints = True
        end
        object cfsLog: TFuncSeries
          Extent.XMin = -1
          Extent.XMax = 3
          Extent.UseXMin = True
          Extent.UseXMax = True
          AxisIndexY = 0
          OnCalculate = ChartLogFuncSeries1Calculate
        end
      end
      object pnlLogControls: TPanel
        Left = 0
        Height = 29
        Top = 278
        Width = 525
        Align = alBottom
        ClientHeight = 29
        ClientWidth = 525
        TabOrder = 1
        object cbLog: TCheckBox
          Left = 4
          Height = 17
          Top = 5
          Width = 64
          Caption = 'Log scale'
          Checked = True
          OnChange = cbLogChange
          State = cbChecked
          TabOrder = 0
        end
      end
    end
    object tsCustomMarks: TTabSheet
      Caption = 'Customized marks'
      ClientHeight = 307
      ClientWidth = 525
      object ChartCustomMarks: TChart
        Left = 0
        Height = 307
        Top = 0
        Width = 525
        AxisList = <        
          item
            Marks.Distance = 0
            Marks.Format = '$%0:.9g'
            Marks.Frame.Style = psSolid
            Marks.LabelBrush.Color = clMoneyGreen
            Marks.LabelBrush.Style = bsSolid
            Marks.Source = lcsMarks
            Marks.Style = smsCustom
            Title.LabelFont.Orientation = 900
          end        
          item
            Alignment = calBottom
            Grid.Visible = False
            Marks.LabelFont.Height = -13
            Marks.LabelFont.Style = [fsBold]
            Marks.Format = '%2:s'
            Marks.Source = lcsMarks
            Marks.Style = smsLabel
            TickLength = 0
          end>
        Foot.Brush.Color = clBtnFace
        Foot.Font.Color = clBlue
        Title.Brush.Color = clBtnFace
        Title.Font.Color = clBlue
        Title.Text.Strings = (
          'TAChart'
        )
        Align = alClient
        ParentColor = False
        object ChartCustomMarksBarSeries1: TBarSeries
          Marks.Frame.Visible = False
          Marks.LabelBrush.Style = bsClear
          BarBrush.Color = clGreen
          BarPen.Color = clLime
          BarPen.Width = 2
          Source = lcsMarks
        end
      end
    end
    object tsAxisGroup: TTabSheet
      Caption = 'Axis groups'
      ClientHeight = 307
      ClientWidth = 525
      object ChartAxisGroup: TChart
        Left = 0
        Height = 307
        Top = 0
        Width = 525
        AxisList = <        
          item
            Grid.Visible = False
            Group = 2
            TickLength = 0
            Title.LabelFont.Orientation = 900
          end        
          item
            Alignment = calBottom
          end>
        Foot.Brush.Color = clBtnFace
        Foot.Font.Color = clBlue
        Title.Brush.Color = clBtnFace
        Title.Font.Color = clBlue
        Title.Text.Strings = (
          'TAChart'
        )
        Align = alClient
        ParentColor = False
      end
    end
    object tsSubmarks: TTabSheet
      Caption = 'Submarks'
      ClientHeight = 307
      ClientWidth = 525
      object ChartSubmarks: TChart
        Left = 0
        Height = 307
        Top = 0
        Width = 525
        AxisList = <        
          item
            Group = 1
            Marks.Source = udcsMain
            TickLength = 6
            Title.LabelFont.Orientation = 900
          end        
          item
            Alignment = calBottom
            Group = 2
            Marks.Source = udcsMain
            TickLength = 6
          end        
          item
            Grid.Visible = False
            Group = 1
            Marks.Visible = False
            Marks.Source = udcsSub
            Marks.Style = smsNone
            TickLength = 2
          end        
          item
            Alignment = calBottom
            Grid.Visible = False
            Group = 2
            Marks.Visible = False
            Marks.Source = udcsSub
            Marks.Style = smsNone
            TickLength = 2
          end>
        Foot.Brush.Color = clBtnFace
        Foot.Font.Color = clBlue
        Title.Brush.Color = clBtnFace
        Title.Font.Color = clBlue
        Title.Text.Strings = (
          'TAChart'
        )
        Align = alClient
        ParentColor = False
        object ChartSubmarksLineSeries1: TLineSeries
          Source = udcsGraph
        end
      end
    end
    object tsDateTime: TTabSheet
      Caption = 'Date and time'
      ClientHeight = 307
      ClientWidth = 525
      object ChartDateTime: TChart
        Left = 0
        Height = 307
        Top = 0
        Width = 525
        AxisList = <        
          item
            Title.LabelFont.Orientation = 900
          end        
          item
            Alignment = calBottom
            Marks.Format = '%2:s'
            Marks.OverlapPolicy = opHideNeighbour
            Marks.Source = DateTimeIntervalChartSource1
            Marks.Style = smsLabel
          end>
        Foot.Brush.Color = clBtnFace
        Foot.Font.Color = clBlue
        Title.Brush.Color = clBtnFace
        Title.Font.Color = clBlue
        Title.Text.Strings = (
          'The series contain data points for every hour in 10 years'
          'Left/right-click to zoom and see various labels on the bottom axis'
        )
        Title.Visible = True
        Toolset = ChartToolsetDateTime
        Align = alClient
        ParentColor = False
        object ChartDateTimeLineSeries1: TLineSeries
          Source = rcsDates
        end
      end
    end
  end
  object lcsMarks: TListChartSource
    DataPoints.Strings = (
      '1|18000|?|January'
      '2|35000|?|February'
      '3|31000|?|March'
      '4|26000|?|April'
      '5|37000|?|May'
      '6|22000|?|June'
    )
    left = 216
    top = 164
  end
  object catLog: TChartAxisTransformations
    left = 216
    top = 60
    object ChartAxisTransformations1LinearAxisTransform2: TLinearAxisTransform
      Scale = 2
    end
    object ChartAxisTransformations1LogarithmAxisTransform1: TLogarithmAxisTransform
      Base = 10
    end
  end
  object catT: TChartAxisTransformations
    left = 352
    top = 60
    object catTFahrToCel: TLinearAxisTransform
      Offset = -17.777777777
      Scale = 0.5555555555
    end
    object catTAutoScaleAxisTransform1: TAutoScaleAxisTransform
      Enabled = False
    end
  end
  object rcsTSummer: TRandomChartSource
    PointsNumber = 20
    RandSeed = 114536250
    XMax = 2009
    XMin = 1990
    YMax = 25
    YMin = 0
    left = 87
    top = 106
  end
  object rcsTWinter: TRandomChartSource
    PointsNumber = 20
    RandSeed = 23453245
    XMax = 2009
    XMin = 1990
    YMax = 20
    YMin = -15
    left = 87
    top = 156
  end
  object catTAuto: TChartAxisTransformations
    left = 352
    top = 112
    object catTAutoAutoScaleAxisTransform1: TAutoScaleAxisTransform
      Enabled = False
    end
  end
  object rcsDates: TRandomChartSource
    RandSeed = 1079653020
    XMax = 0
    XMin = 0
    YMax = 50
    YMin = 5
    left = 87
    top = 216
  end
  object DateTimeIntervalChartSource1: TDateTimeIntervalChartSource
    left = 352
    top = 232
  end
  object ChartToolsetDateTime: TChartToolset
    left = 440
    top = 232
    object ChartToolset1ZoomIn: TZoomClickTool
      Shift = [ssLeft]
      FixedPoint = True
      ZoomFactor = 4
      ZoomRatio = 0.25
    end
    object ChartToolset1ZoomOut: TZoomClickTool
      Shift = [ssRight]
      FixedPoint = True
      ZoomFactor = 0.25
      ZoomRatio = 4
    end
  end
  object udcsMain: TUserDefinedChartSource
    OnGetChartDataItem = udcsMainGetChartDataItem
    PointsNumber = 10
    left = 440
    top = 60
  end
  object udcsSub: TUserDefinedChartSource
    OnGetChartDataItem = udcsSubGetChartDataItem
    PointsNumber = 50
    left = 440
    top = 112
  end
  object udcsGraph: TUserDefinedChartSource
    OnGetChartDataItem = udcsGraphGetChartDataItem
    PointsNumber = 100
    left = 440
    top = 172
  end
end