object Form1: TForm1 Left = 1322 Height = 361 Top = 181 Width = 510 Caption = 'Form1' ClientHeight = 361 ClientWidth = 510 OnCreate = FormCreate Position = poScreenCenter LCLVersion = '0.9.31' object Chart1: TChart Left = 0 Height = 299 Top = 0 Width = 510 AxisList = < item Title.LabelFont.Orientation = 900 Visible = False end item Alignment = calBottom Visible = False end> BackColor = clSkyBlue Foot.Brush.Color = clBtnFace Foot.Font.Color = clBlue Legend.BackgroundBrush.Color = clMoneyGreen Legend.Visible = True Title.Brush.Color = clBtnFace Title.Font.Color = clBlue Title.Text.Strings = ( 'TAChart' ) Align = alClient Color = clOlive ParentColor = False object Chart1LineSeries1: TLineSeries Title = 'Line' LinePen.Color = clRed Pointer.Brush.Color = clRed ShowPoints = True end object Chart1AreaSeries1: TAreaSeries Title = 'Area' AreaBrush.Color = clGreen AreaBrush.Style = bsCross Source = RandomChartSource1 end object Chart1PieSeries1: TPieSeries Legend.Multiplicity = lmPoint Marks.Format = '%2:s %1:.2f%%' Marks.Style = smsLabelPercent Exploded = True Source = ListChartSource2 end object Chart1FuncSeries1: TFuncSeries Legend.UserItemsCount = 2 Extent.XMax = 5 Extent.UseXMin = True Extent.UseXMax = True Title = 'Function' OnCalculate = Chart1FuncSeries1Calculate Pen.Color = clPurple Pen.Width = 2 end end object pnControls: TPanel Left = 0 Height = 62 Top = 299 Width = 510 Align = alBottom ClientHeight = 62 ClientWidth = 510 TabOrder = 1 object lblMarginY: TLabel Left = 8 Height = 14 Top = 33 Width = 42 Caption = 'Y margin' ParentColor = False end object seMarginY: TSpinEdit Left = 60 Height = 21 Top = 33 Width = 54 MaxValue = 20 OnChange = seMarginYChange TabOrder = 0 Value = 4 end object seSymbolWidth: TSpinEdit Left = 196 Height = 21 Top = 8 Width = 54 MaxValue = 50 OnChange = seSymbolWidthChange TabOrder = 1 Value = 20 end object lblSymbolWidth: TLabel Left = 128 Height = 14 Top = 8 Width = 64 Caption = 'Symbol width' ParentColor = False end object rgAlignment: TRadioGroup Left = 324 Height = 60 Top = 1 Width = 185 Align = alRight AutoFill = True Caption = ' Alignment ' ChildSizing.LeftRightSpacing = 6 ChildSizing.TopBottomSpacing = 6 ChildSizing.EnlargeHorizontal = crsHomogenousChildResize ChildSizing.EnlargeVertical = crsHomogenousChildResize ChildSizing.ShrinkHorizontal = crsScaleChilds ChildSizing.ShrinkVertical = crsScaleChilds ChildSizing.Layout = cclTopToBottomThenLeftToRight ChildSizing.ControlsPerLine = 2 ClientHeight = 42 ClientWidth = 181 Columns = 2 ItemIndex = 2 Items.Strings = ( 'TopLeft' 'BottomLeft' 'TopRight' 'BottomRight' ) OnClick = rgAlignmentClick TabOrder = 2 end object cbUseSidebar: TCheckBox Left = 256 Height = 17 Top = 33 Width = 56 Caption = 'Sidebar' Checked = True OnChange = cbUseSidebarChange State = cbChecked TabOrder = 3 end object lblSpacing: TLabel Left = 128 Height = 14 Top = 33 Width = 38 Caption = 'Spacing' ParentColor = False end object seSpacing: TSpinEdit Left = 196 Height = 21 Top = 33 Width = 54 MaxValue = 20 OnChange = seSpacingChange TabOrder = 4 Value = 4 end object lblMarginX: TLabel Left = 8 Height = 14 Top = 8 Width = 42 Caption = 'X margin' ParentColor = False end object seMarginX: TSpinEdit Left = 60 Height = 21 Top = 8 Width = 54 MaxValue = 20 OnChange = seMarginXChange TabOrder = 5 Value = 4 end end object RandomChartSource1: TRandomChartSource PointsNumber = 7 RandSeed = 104675296 XMax = 10 XMin = 1 YMax = 10 YMin = 1 left = 380 top = 112 end object ListChartSource1: TListChartSource DataPoints.Strings = ( '0|0|?|' '1|2|$00FF00|' '2|5|?|' '3|1|?|' '4|6|?|' ) left = 380 top = 168 end object ListChartSource2: TListChartSource DataPoints.Strings = ( '0|5|?|abcc' '0|6|?|def' '0.2|4|?|пример' '0|7|?|ещё' '0|2|?|два слова' ) left = 380 top = 228 end end