object Form1: TForm1
  Left = 286
  Height = 250
  Top = 163
  Width = 400
  Caption = 'Form1'
  ClientHeight = 250
  ClientWidth = 400
  OnCreate = FormCreate
  LCLVersion = '2.1.0.0'
  object Chart1: TChart
    Left = 0
    Height = 250
    Top = 0
    Width = 400
    AxisList = <    
      item
        Grid.Color = clSilver
        Marks.LabelBrush.Style = bsClear
        Minors = <>
        Title.LabelFont.Orientation = 900
        Title.LabelFont.Style = [fsBold]
        Title.Visible = True
        Title.Caption = 'y'
        Title.LabelBrush.Style = bsClear
      end    
      item
        Grid.Color = clSilver
        Alignment = calBottom
        Marks.LabelBrush.Style = bsClear
        Minors = <>
        Title.LabelFont.Style = [fsBold]
        Title.Visible = True
        Title.Caption = 'x'
        Title.LabelBrush.Style = bsClear
      end>
    BackColor = clWhite
    Foot.Brush.Color = clBtnFace
    Foot.Font.Color = clBlue
    Title.Brush.Color = clBtnFace
    Title.Font.Color = clBlue
    Title.Text.Strings = (
      'TAChart'
    )
    OnExtentValidate = Chart1ExtentValidate
    Align = alClient
    object Chart1FuncSeries1: TFuncSeries
      Extent.UseXMax = True
      Extent.UseXMin = True
      Extent.UseYMax = True
      Extent.UseYMin = True
      Extent.XMax = 10
      Extent.XMin = -10
      Extent.YMax = 2
      Extent.YMin = -2
      Title = 'y = tan(x)'
      Pen.Color = clRed
      OnCalculate = Chart1FuncSeries1Calculate
    end
    object Chart1FuncSeries2: TFuncSeries
      Title = 'y =ln(x)'
      Pen.Color = clBlue
      OnCalculate = Chart1FuncSeries2Calculate
    end
    object Chart1ConstantLine1: TConstantLine
      Legend.Visible = False
      Arrow.BaseLength = 8
      Arrow.Visible = True
      Position = 0
    end
    object Chart1ConstantLine2: TConstantLine
      Legend.Visible = False
      Arrow.BaseLength = 8
      Arrow.Visible = True
      LineStyle = lsVertical
      Position = 0
    end
  end
end