object Form1: TForm1 Left = 280 Height = 444 Top = 130 Width = 803 Caption = 'Form1' ClientHeight = 444 ClientWidth = 803 OnCreate = FormCreate OnShow = FormShow LCLVersion = '2.1.0.0' object Chart1: TChart Left = 4 Height = 436 Top = 4 Width = 463 AxisList = < item Grid.Color = clSilver Grid.Style = psSolid Marks.LabelBrush.Style = bsClear Minors = <> Title.LabelFont.Orientation = 900 Title.LabelBrush.Style = bsClear end item Grid.Color = clSilver Grid.Style = psSolid Grid.Visible = False Alignment = calBottom AxisPen.Visible = True Marks.LabelBrush.Style = bsClear Minors = <> Title.LabelBrush.Style = bsClear ZPosition = 10 end> BackColor = clWhite Foot.Brush.Color = clBtnFace Foot.Font.Color = clBlue Margins.Bottom = 0 Title.Brush.Color = clBtnFace Title.Font.Color = clBlue Title.Text.Strings = ( 'TAChart' ) Toolset = ChartToolset1 Align = alClient BorderSpacing.Left = 4 BorderSpacing.Top = 4 BorderSpacing.Bottom = 4 Color = clWhite object Chart1LineSeries1: TLineSeries Title = 'Line' ZPosition = 1 LinePen.Color = clBlue LinePen.Width = 2 Pointer.Brush.Color = clSkyBlue Pointer.HorizSize = 5 Pointer.Style = psCircle Pointer.VertSize = 5 Pointer.Visible = True ShowPoints = True Source = RandomChartSource1 end object Chart1BarSeries1: TBarSeries Title = 'Bar' ZPosition = 2 BarBrush.Color = clRed Source = RandomChartSource2 end object Chart1AreaSeries1: TAreaSeries Title = 'Area' ZPosition = 3 AreaBrush.Color = clYellow Source = RandomChartSource3 end end object Panel1: TPanel Left = 584 Height = 444 Top = 0 Width = 219 Align = alRight BevelOuter = bvNone ClientHeight = 444 ClientWidth = 219 TabOrder = 1 object LblSeries: TLabel Left = 4 Height = 21 Top = 30 Width = 215 Align = alTop BorderSpacing.Left = 4 BorderSpacing.Top = 4 Caption = 'LblSeries' Font.Height = -16 Font.Style = [fsBold] ParentColor = False ParentFont = False end object CbShow: TCheckBox Left = 4 Height = 19 Top = 55 Width = 215 Align = alTop BorderSpacing.Left = 4 BorderSpacing.Top = 4 Caption = 'Show' Checked = True OnChange = CbShowChange State = cbChecked TabOrder = 0 end object Notebook1: TNotebook Left = 0 Height = 366 Top = 78 Width = 219 PageIndex = 0 Align = alClient BorderSpacing.Top = 4 TabOrder = 1 object Page1: TPage object GbLineSerLines: TGroupBox Left = 0 Height = 117 Top = 159 Width = 211 Align = alTop AutoSize = True BorderSpacing.Top = 8 BorderSpacing.Right = 8 Caption = 'Lines' ClientHeight = 97 ClientWidth = 207 Font.Style = [fsBold] ParentFont = False TabOrder = 1 object CbLineSerLinePenStyle: TChartComboBox AnchorSideTop.Control = CbShowLines AnchorSideTop.Side = asrBottom AnchorSideRight.Side = asrBottom Left = 80 Height = 22 Top = 5 Width = 118 PenPattern = '1|1' PointerStyle = psNone Anchors = [akTop, akRight] BorderSpacing.Top = 4 ItemHeight = 16 ItemIndex = 0 ParentFont = False TabOrder = 1 OnChange = LinePenChange end object CbLineSerLinePenWidth: TChartComboBox AnchorSideLeft.Control = CbLineSerLinePenStyle AnchorSideTop.Control = CbLineSerLinePenStyle AnchorSideTop.Side = asrBottom AnchorSideRight.Control = CbLineSerLinePenStyle AnchorSideRight.Side = asrBottom Left = 80 Height = 22 Top = 35 Width = 118 Mode = ccmPenWidth PenPattern = '1|1' PointerStyle = psNone Anchors = [akTop, akRight] BorderSpacing.Top = 8 ItemHeight = 16 ItemIndex = 0 ParentFont = False TabOrder = 2 OnChange = LinePenChange end object Label1: TLabel AnchorSideLeft.Control = GbLineSerLines AnchorSideTop.Control = CbLineSerLinePenStyle AnchorSideTop.Side = asrCenter Left = 8 Height = 15 Top = 9 Width = 47 BorderSpacing.Left = 8 Caption = 'Pen style' ParentColor = False ParentFont = False end object Label2: TLabel AnchorSideLeft.Control = Label1 AnchorSideTop.Control = CbLineSerLinePenWidth AnchorSideTop.Side = asrCenter Left = 8 Height = 15 Top = 39 Width = 53 Caption = 'Pen width' ParentColor = False ParentFont = False end object CbLineSerLinePenColor: TColorBox AnchorSideLeft.Control = CbLineSerLinePenWidth AnchorSideTop.Control = CbLineSerLinePenWidth AnchorSideTop.Side = asrBottom AnchorSideRight.Control = CbLineSerLinePenWidth AnchorSideRight.Side = asrBottom Left = 80 Height = 22 Top = 65 Width = 118 Style = [cbStandardColors, cbExtendedColors, cbCustomColor, cbPrettyNames] Anchors = [akTop, akRight] BorderSpacing.Top = 8 BorderSpacing.Bottom = 10 ItemHeight = 16 OnChange = LinePenChange ParentFont = False TabOrder = 3 end object Label4: TLabel AnchorSideLeft.Control = Label1 AnchorSideTop.Control = CbLineSerLinePenColor AnchorSideTop.Side = asrCenter Left = 8 Height = 15 Top = 69 Width = 50 Caption = 'Pen color' ParentColor = False ParentFont = False end object CbShowLines: TCheckBox AnchorSideTop.Control = GbLineSerLines Left = 149 Height = 19 Top = -18 Width = 49 Alignment = taLeftJustify Anchors = [] Caption = 'Show' Checked = True OnChange = LinePenChange ParentFont = False State = cbChecked TabOrder = 0 end end object GbLineSerPointer: TGroupBox Left = 0 Height = 147 Top = 4 Width = 211 Align = alTop AutoSize = True BorderSpacing.Top = 4 BorderSpacing.Right = 8 Caption = 'Pointer symbol' ClientHeight = 127 ClientWidth = 207 Font.Style = [fsBold] ParentFont = False TabOrder = 0 object CbLineSerPointerStyle: TChartComboBox AnchorSideTop.Control = CbShowPoints AnchorSideTop.Side = asrBottom AnchorSideRight.Side = asrBottom Left = 80 Height = 22 Top = 4 Width = 118 Mode = ccmPointerStyle PenPattern = '1|1' PointerStyle = psNone Anchors = [akTop, akRight] BorderSpacing.Top = 4 ItemHeight = 16 ItemIndex = 0 ParentFont = False TabOrder = 1 OnChange = LinePointerChange end object Label5: TLabel AnchorSideLeft.Control = GbLineSerPointer AnchorSideTop.Control = CbLineSerPointerStyle AnchorSideTop.Side = asrCenter Left = 8 Height = 15 Top = 8 Width = 40 BorderSpacing.Left = 8 Caption = 'Symbol' ParentColor = False ParentFont = False end object Label3: TLabel AnchorSideLeft.Control = Label5 AnchorSideTop.Control = CbLineSerPointerBrushColor AnchorSideTop.Side = asrCenter Left = 8 Height = 15 Top = 38 Width = 45 Caption = 'Fill color' ParentColor = False ParentFont = False end object Label6: TLabel AnchorSideLeft.Control = Label5 AnchorSideTop.Control = CbLineSerPointerBorderColor AnchorSideTop.Side = asrCenter Left = 8 Height = 15 Top = 68 Width = 65 Caption = 'Border color' ParentColor = False ParentFont = False end object CbLineSerPointerBorderColor: TColorBox AnchorSideLeft.Control = CbLineSerPointerBrushColor AnchorSideTop.Control = CbLineSerPointerBrushColor AnchorSideTop.Side = asrBottom AnchorSideRight.Control = CbLineSerPointerBrushColor AnchorSideRight.Side = asrBottom Left = 80 Height = 22 Top = 64 Width = 118 Style = [cbStandardColors, cbExtendedColors, cbCustomColor, cbPrettyNames] Anchors = [akTop, akRight] BorderSpacing.Top = 8 ItemHeight = 16 OnChange = LinePointerChange ParentFont = False TabOrder = 3 end object CbLineSerPointerBrushColor: TColorBox AnchorSideLeft.Control = CbLineSerPointerStyle AnchorSideTop.Control = CbLineSerPointerStyle AnchorSideTop.Side = asrBottom AnchorSideRight.Control = CbLineSerPointerStyle AnchorSideRight.Side = asrBottom Left = 80 Height = 22 Top = 34 Width = 118 Style = [cbStandardColors, cbExtendedColors, cbCustomColor, cbPrettyNames] Anchors = [akTop, akRight] BorderSpacing.Top = 8 ItemHeight = 16 OnChange = LinePointerChange ParentFont = False TabOrder = 2 end object EdLineSerPointerSize: TSpinEdit AnchorSideLeft.Control = CbLineSerPointerBorderColor AnchorSideTop.Control = CbLineSerPointerBorderColor AnchorSideTop.Side = asrBottom AnchorSideRight.Side = asrBottom Left = 80 Height = 23 Top = 94 Width = 62 Alignment = taRightJustify BorderSpacing.Top = 8 BorderSpacing.Bottom = 10 OnChange = LinePointerChange ParentFont = False TabOrder = 4 Value = 4 end object Label7: TLabel AnchorSideLeft.Control = Label5 AnchorSideTop.Control = EdLineSerPointerSize AnchorSideTop.Side = asrCenter Left = 8 Height = 15 Top = 98 Width = 20 Caption = 'Size' ParentColor = False ParentFont = False end object CbShowPoints: TCheckBox AnchorSideTop.Control = GbLineSerPointer Left = 148 Height = 19 Top = -19 Width = 49 Alignment = taLeftJustify Anchors = [] Caption = 'Show' Checked = True OnChange = LinePointerChange ParentFont = False State = cbChecked TabOrder = 0 end end end object Page2: TPage object GbBarSerPen: TGroupBox Left = 0 Height = 112 Top = 94 Width = 211 Align = alTop AutoSize = True BorderSpacing.Top = 8 BorderSpacing.Right = 8 Caption = 'Bar border' ClientHeight = 92 ClientWidth = 207 Font.Style = [fsBold] ParentFont = False TabOrder = 1 object CbBarSerPenStyle: TChartComboBox AnchorSideTop.Control = GbBarSerPen AnchorSideRight.Side = asrBottom Left = 80 Height = 22 Top = 0 Width = 118 PenPattern = '1|1' PointerStyle = psNone Anchors = [akTop, akRight] ItemHeight = 16 ItemIndex = 0 ParentFont = False TabOrder = 0 OnChange = BarPenChange end object CbBarSerPenWidth: TChartComboBox AnchorSideTop.Control = CbBarSerPenStyle AnchorSideTop.Side = asrBottom AnchorSideRight.Side = asrBottom Left = 80 Height = 22 Top = 30 Width = 118 Mode = ccmPenWidth PenPattern = '1|1' PointerStyle = psNone Anchors = [akTop, akRight] BorderSpacing.Top = 8 ItemHeight = 16 ItemIndex = 0 ParentFont = False TabOrder = 1 OnChange = BarPenChange end object Label8: TLabel AnchorSideLeft.Control = GbBarSerPen AnchorSideTop.Control = CbBarSerPenStyle AnchorSideTop.Side = asrCenter Left = 8 Height = 15 Top = 4 Width = 47 BorderSpacing.Left = 8 Caption = 'Pen style' ParentColor = False ParentFont = False end object Label9: TLabel AnchorSideLeft.Control = Label8 AnchorSideTop.Control = CbBarSerPenWidth AnchorSideTop.Side = asrCenter Left = 8 Height = 15 Top = 34 Width = 53 Caption = 'Pen width' ParentColor = False ParentFont = False end object CbBarSerPenColor: TColorBox AnchorSideTop.Control = CbBarSerPenWidth AnchorSideTop.Side = asrBottom AnchorSideRight.Side = asrBottom Left = 80 Height = 22 Top = 60 Width = 118 DefaultColorColor = 460551 Style = [cbStandardColors, cbExtendedColors, cbCustomColor, cbPrettyNames] Anchors = [akTop, akRight] BorderSpacing.Top = 8 BorderSpacing.Bottom = 10 ItemHeight = 16 OnChange = BarPenChange ParentFont = False TabOrder = 2 end object Label10: TLabel AnchorSideLeft.Control = Label8 AnchorSideTop.Control = CbBarSerPenColor AnchorSideTop.Side = asrCenter Left = 8 Height = 15 Top = 64 Width = 50 Caption = 'Pen color' ParentColor = False ParentFont = False end end object GbBarSerBrush: TGroupBox Left = 0 Height = 82 Top = 4 Width = 211 Align = alTop AutoSize = True BorderSpacing.Top = 4 BorderSpacing.Right = 8 Caption = 'Bar' ClientHeight = 62 ClientWidth = 207 Font.Style = [fsBold] ParentFont = False TabOrder = 0 object Label12: TLabel AnchorSideLeft.Control = GbBarSerBrush AnchorSideTop.Control = CbBarSerBrushColor AnchorSideTop.Side = asrCenter Left = 8 Height = 15 Top = 34 Width = 45 BorderSpacing.Left = 8 Caption = 'Fill color' ParentColor = False ParentFont = False end object CbBarSerBrushColor: TColorBox AnchorSideTop.Control = CbBarSerBrushStyle AnchorSideTop.Side = asrBottom AnchorSideRight.Side = asrBottom Left = 80 Height = 22 Top = 30 Width = 118 DefaultColorColor = 263172 Style = [cbStandardColors, cbExtendedColors, cbCustomColor, cbPrettyNames] Anchors = [akTop, akRight] BorderSpacing.Top = 8 BorderSpacing.Bottom = 10 ItemHeight = 16 OnChange = BarBrushChange ParentFont = False TabOrder = 1 end object Label14: TLabel AnchorSideLeft.Control = Label12 AnchorSideTop.Control = CbBarSerBrushStyle AnchorSideTop.Side = asrCenter Left = 8 Height = 15 Top = 4 Width = 56 Caption = 'Fill pattern' ParentColor = False ParentFont = False end object CbBarSerBrushStyle: TChartComboBox AnchorSideTop.Control = GbBarSerBrush AnchorSideRight.Side = asrBottom Left = 80 Height = 22 Top = 0 Width = 118 Mode = ccmBrushStyle PenPattern = '1|1' PointerStyle = psNone Anchors = [akTop, akRight] ItemHeight = 16 ItemIndex = 0 ParentFont = False TabOrder = 0 OnChange = BarBrushChange end end end object Page3: TPage object GbAreaSerBrush: TGroupBox Left = 0 Height = 82 Top = 4 Width = 211 Align = alTop AutoSize = True BorderSpacing.Top = 4 BorderSpacing.Right = 8 Caption = 'Area fill' ClientHeight = 62 ClientWidth = 207 Font.Style = [fsBold] ParentFont = False TabOrder = 0 object Label13: TLabel AnchorSideLeft.Control = GbAreaSerBrush AnchorSideTop.Control = CbAreaSerBrushColor AnchorSideTop.Side = asrCenter Left = 8 Height = 15 Top = 34 Width = 45 BorderSpacing.Left = 8 Caption = 'Fill color' ParentColor = False ParentFont = False end object CbAreaSerBrushColor: TColorBox AnchorSideTop.Control = CbAreaSerBrushStyle AnchorSideTop.Side = asrBottom AnchorSideRight.Side = asrBottom Left = 80 Height = 22 Top = 30 Width = 118 Style = [cbStandardColors, cbExtendedColors, cbCustomColor, cbPrettyNames] Anchors = [akTop, akRight] BorderSpacing.Top = 8 BorderSpacing.Bottom = 10 ItemHeight = 16 OnChange = AreaBrushChange ParentFont = False TabOrder = 1 end object Label15: TLabel AnchorSideLeft.Control = Label13 AnchorSideTop.Control = CbAreaSerBrushStyle AnchorSideTop.Side = asrCenter Left = 8 Height = 15 Top = 4 Width = 56 Caption = 'Fill pattern' ParentColor = False ParentFont = False end object CbAreaSerBrushStyle: TChartComboBox AnchorSideTop.Control = GbAreaSerBrush AnchorSideRight.Side = asrBottom Left = 80 Height = 22 Top = 0 Width = 118 Mode = ccmBrushStyle PenPattern = '1|1' PointerStyle = psNone Anchors = [akTop, akRight] ItemHeight = 16 ItemIndex = 0 ParentFont = False TabOrder = 0 OnChange = AreaBrushChange end end object GbAreaSerContour: TGroupBox Left = 0 Height = 112 Top = 94 Width = 211 Align = alTop AutoSize = True BorderSpacing.Top = 8 BorderSpacing.Right = 8 Caption = 'Area contour' ClientHeight = 92 ClientWidth = 207 Font.Style = [fsBold] ParentFont = False TabOrder = 1 object CbAreaSerContourStyle: TChartComboBox AnchorSideTop.Control = GbAreaSerContour AnchorSideRight.Side = asrBottom Left = 80 Height = 22 Top = 0 Width = 118 PenPattern = '1|1' PointerStyle = psNone Anchors = [akTop, akRight] ItemHeight = 16 ItemIndex = 0 ParentFont = False TabOrder = 0 OnChange = AreaContourChange end object CbAreaSerContourWidth: TChartComboBox AnchorSideTop.Control = CbAreaSerContourStyle AnchorSideTop.Side = asrBottom AnchorSideRight.Side = asrBottom Left = 80 Height = 22 Top = 30 Width = 118 Mode = ccmPenWidth PenPattern = '1|1' PointerStyle = psNone Anchors = [akTop, akRight] BorderSpacing.Top = 8 ItemHeight = 16 ItemIndex = 0 ParentFont = False TabOrder = 1 OnChange = AreaContourChange end object Label11: TLabel AnchorSideLeft.Control = GbAreaSerContour AnchorSideTop.Control = CbAreaSerContourStyle AnchorSideTop.Side = asrCenter Left = 8 Height = 15 Top = 4 Width = 47 BorderSpacing.Left = 8 Caption = 'Pen style' ParentColor = False ParentFont = False end object Label16: TLabel AnchorSideLeft.Control = Label11 AnchorSideTop.Control = CbAreaSerContourWidth AnchorSideTop.Side = asrCenter Left = 8 Height = 15 Top = 34 Width = 53 Caption = 'Pen width' ParentColor = False ParentFont = False end object CbAreaSerContourColor: TColorBox AnchorSideTop.Control = CbAreaSerContourWidth AnchorSideTop.Side = asrBottom AnchorSideRight.Side = asrBottom Left = 80 Height = 22 Top = 60 Width = 118 Style = [cbStandardColors, cbExtendedColors, cbCustomColor, cbPrettyNames] Anchors = [akTop, akRight] BorderSpacing.Top = 8 BorderSpacing.Bottom = 10 ItemHeight = 16 OnChange = AreaContourChange ParentFont = False TabOrder = 2 end object Label17: TLabel AnchorSideLeft.Control = Label11 AnchorSideTop.Control = CbAreaSerContourColor AnchorSideTop.Side = asrCenter Left = 8 Height = 15 Top = 64 Width = 50 Caption = 'Pen color' ParentColor = False ParentFont = False end end object GbAreaSerLines: TGroupBox Left = 0 Height = 112 Top = 214 Width = 211 Align = alTop AutoSize = True BorderSpacing.Top = 8 BorderSpacing.Right = 8 Caption = 'Area drop lines' ClientHeight = 92 ClientWidth = 207 Font.Style = [fsBold] ParentFont = False TabOrder = 2 object CbAreaSerLinesStyle: TChartComboBox AnchorSideTop.Control = GbAreaSerLines AnchorSideRight.Side = asrBottom Left = 80 Height = 22 Top = 0 Width = 118 PenPattern = '1|1' PointerStyle = psNone Anchors = [akTop, akRight] ItemHeight = 16 ItemIndex = 0 ParentFont = False TabOrder = 0 OnChange = AreaLinesChange end object CbAreaSerLinesWidth: TChartComboBox AnchorSideTop.Control = CbAreaSerLinesStyle AnchorSideTop.Side = asrBottom AnchorSideRight.Side = asrBottom Left = 80 Height = 22 Top = 30 Width = 118 Mode = ccmPenWidth PenPattern = '1|1' PointerStyle = psNone Anchors = [akTop, akRight] BorderSpacing.Top = 8 ItemHeight = 16 ItemIndex = 0 ParentFont = False TabOrder = 1 OnChange = AreaLinesChange end object Label18: TLabel AnchorSideLeft.Control = GbAreaSerLines AnchorSideTop.Control = CbAreaSerLinesStyle AnchorSideTop.Side = asrCenter Left = 8 Height = 15 Top = 4 Width = 47 BorderSpacing.Left = 8 Caption = 'Pen style' ParentColor = False ParentFont = False end object Label19: TLabel AnchorSideLeft.Control = Label18 AnchorSideTop.Control = CbAreaSerLinesWidth AnchorSideTop.Side = asrCenter Left = 8 Height = 15 Top = 34 Width = 53 Caption = 'Pen width' ParentColor = False ParentFont = False end object CbAreaSerLinesColor: TColorBox AnchorSideTop.Control = CbAreaSerLinesWidth AnchorSideTop.Side = asrBottom AnchorSideRight.Side = asrBottom Left = 80 Height = 22 Top = 60 Width = 118 Style = [cbStandardColors, cbExtendedColors, cbCustomColor, cbPrettyNames] Anchors = [akTop, akRight] BorderSpacing.Top = 8 BorderSpacing.Bottom = 10 ItemHeight = 16 OnChange = AreaLinesChange ParentFont = False TabOrder = 2 end object Label20: TLabel AnchorSideLeft.Control = Label18 AnchorSideTop.Control = CbAreaSerLinesColor AnchorSideTop.Side = asrCenter Left = 8 Height = 15 Top = 64 Width = 50 Caption = 'Pen color' ParentColor = False ParentFont = False end end end end object Label21: TLabel Left = 4 Height = 15 Top = 4 Width = 211 Align = alTop BorderSpacing.Around = 4 Caption = 'Select the series to be modified' ParentColor = False end object Bevel2: TBevel Left = 4 Height = 3 Top = 23 Width = 211 Align = alTop BorderSpacing.Left = 4 BorderSpacing.Right = 4 Shape = bsBottomLine end end object ChartListbox1: TChartListbox Left = 467 Height = 436 Top = 4 Width = 112 Chart = Chart1 Align = alRight BorderSpacing.Top = 4 BorderSpacing.Bottom = 4 BorderStyle = bsNone ItemHeight = 0 OnClick = ChartListbox1Click TabOrder = 2 end object Splitter1: TSplitter Left = 579 Height = 444 Top = 0 Width = 5 Align = alRight ResizeAnchor = akRight end object RandomChartSource1: TRandomChartSource PointsNumber = 10 RandSeed = 1021051994 XMax = 10 XMin = 0 YMax = 12 YMin = 8 left = 108 top = 37 end object RandomChartSource2: TRandomChartSource PointsNumber = 6 RandSeed = 1021110653 XMax = 10 XMin = 0 YMax = 8 YMin = 5 left = 108 top = 96 end object RandomChartSource3: TRandomChartSource PointsNumber = 8 RandSeed = 1021188201 XMax = 10 XMin = 0 YMax = 4 YMin = 0 left = 108 top = 152 end object ChartToolset1: TChartToolset left = 329 top = 98 object ChartToolset1DataPointClickTool1: TDataPointClickTool Shift = [ssLeft] GrabRadius = 16 OnPointClick = ChartToolset1DataPointClickTool1PointClick end end end