object Form1: TForm1 Left = 404 Height = 481 Top = 180 Width = 483 ActiveControl = Chart1 Caption = 'Form1' ClientHeight = 481 ClientWidth = 483 OnCreate = FormCreate Position = poScreenCenter LCLVersion = '1.1' object Chart1: TChart Left = 0 Height = 447 Top = 34 Width = 483 AxisList = < item Minors = <> Title.LabelFont.Orientation = 900 end item Alignment = calBottom Minors = <> end> Foot.Brush.Color = clBtnFace Foot.Font.Color = clBlue Margins.Left = 8 Margins.Top = 8 Margins.Right = 8 Margins.Bottom = 8 Title.Brush.Color = clBtnFace Title.Font.Color = clBlue Title.Text.Strings = ( 'Drag data points while holding Shift key' 'Change point color by right-click' 'Show hint while holding ctrl key' ) Title.Visible = True Toolset = ChartToolset1 Align = alClient DoubleBuffered = True ParentColor = False object Chart1LineSeries1: TLineSeries Marks.Clipped = False Marks.Format = '%0:.9g' Marks.Style = smsValue OnGetMark = Chart1LineSeries1GetMark Pointer.Brush.Color = clPurple Pointer.HorizSize = 6 Pointer.Style = psDiamond Pointer.VertSize = 6 ShowPoints = True end end object Panel1: TPanel Left = 0 Height = 34 Top = 0 Width = 483 Align = alTop ClientHeight = 34 ClientWidth = 483 TabOrder = 1 object cbSorted: TCheckBox Left = 12 Height = 17 Top = 8 Width = 52 Caption = 'Sorted' OnChange = cbSortedChange TabOrder = 0 end end object ChartToolset1: TChartToolset left = 99 top = 129 object ChartToolset1DataPointDragTool1: TDataPointDragTool Shift = [ssShift, ssLeft] GrabRadius = 10 ActiveCursor = crDrag end object ChartToolset1DataPointClickTool1: TDataPointClickTool Shift = [ssRight] GrabRadius = 10 ActiveCursor = crHandPoint OnPointClick = ChartToolset1DataPointClickTool1PointClick end object ChartToolset1DataPointHintTool1: TDataPointHintTool Shift = [ssCtrl] GrabRadius = 10 ActiveCursor = crHandPoint OnHint = ChartToolset1DataPointHintTool1Hint UseDefaultHintText = False end end end