object Form1: TForm1 Left = 290 Height = 362 Top = 152 Width = 461 Caption = 'Form1' ClientHeight = 362 ClientWidth = 461 Position = poScreenCenter LCLVersion = '0.9.29' object Chart1: TChart Left = 0 Height = 362 Top = 0 Width = 461 AxisList = < item Alignment = calLeft Offset = 0 Scale = 1 Title.Font.Orientation = 900 end item Alignment = calBottom Offset = 0 Scale = 1 end> ExpandPercentage = 10 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 ParentColor = False object Chart1FuncSeries1: TFuncSeries Extent.XMin = -6.28 Extent.YMin = -1 Extent.XMax = 6.28 Extent.YMax = 1 Extent.UseXMin = True Extent.UseYMin = True Extent.UseXMax = True Extent.UseYMax = True OnCalculate = Chart1FuncSeries1Calculate Pen.Color = clOlive Pen.Width = 2 Step = 4 Title = 'Sin(x)' end object Chart1XAxis: TLine ShowInLegend = False Position = 0 SeriesColor = clBlack end object Chart1YAxis: TLine ShowInLegend = False LineStyle = lsVertical Position = 0 SeriesColor = clBlack end object Chart1BarSeries1: TBarSeries Title = 'Cos(x)' BarBrush.Color = clMoneyGreen SeriesColor = clMoneyGreen Source = UserDefinedChartSource1 end object Chart1UserDrawnSeries1: TUserDrawnSeries OnDraw = Chart1UserDrawnSeries1Draw end end object UserDefinedChartSource1: TUserDefinedChartSource OnGetChartDataItem = UserDefinedChartSource1GetChartDataItem PointsNumber = 14 left = 135 top = 114 end end