1object Form1: TForm1 2 Left = 308 3 Height = 319 4 Top = 132 5 Width = 688 6 Caption = 'Form1' 7 ClientHeight = 319 8 ClientWidth = 688 9 OnCreate = FormCreate 10 LCLVersion = '1.9.0.0' 11 object OpenGLControl1: TOpenGLControl 12 AnchorSideLeft.Control = Bevel1 13 AnchorSideTop.Control = Owner 14 AnchorSideRight.Control = Owner 15 AnchorSideRight.Side = asrBottom 16 AnchorSideBottom.Control = Owner 17 AnchorSideBottom.Side = asrBottom 18 Left = 343 19 Height = 319 20 Top = 0 21 Width = 345 22 Anchors = [akTop, akLeft, akRight, akBottom] 23 AutoResizeViewport = True 24 OnPaint = OpenGLControl1Paint 25 end 26 object Chart1: TChart 27 AnchorSideLeft.Control = Owner 28 AnchorSideTop.Control = Owner 29 AnchorSideRight.Control = Bevel1 30 AnchorSideBottom.Control = Owner 31 AnchorSideBottom.Side = asrBottom 32 Left = 0 33 Height = 319 34 Top = 0 35 Width = 343 36 AxisList = < 37 item 38 Marks.LabelFont.Color = clTeal 39 Marks.LabelFont.Height = -13 40 Marks.LabelFont.Name = 'Arial' 41 Marks.Frame.Style = psSolid 42 Marks.LabelBrush.Color = clYellow 43 Minors = <> 44 Title.LabelFont.Orientation = 900 45 Title.LabelBrush.Style = bsClear 46 end 47 item 48 Alignment = calBottom 49 Marks.LabelFont.Height = -13 50 Marks.LabelFont.Name = 'Arial' 51 Marks.LabelBrush.Style = bsClear 52 Minors = <> 53 Title.LabelBrush.Style = bsClear 54 end> 55 Foot.Brush.Color = clBtnFace 56 Foot.Font.Color = clBlue 57 Title.Brush.Color = clSilver 58 Title.Font.Color = clBlue 59 Title.Font.Height = -19 60 Title.Font.Name = 'Arial' 61 Title.Font.Style = [fsItalic] 62 Title.Text.Strings = ( 63 'Standard' 64 ) 65 Title.Visible = True 66 OnAfterPaint = Chart1AfterPaint 67 Anchors = [akTop, akLeft, akRight, akBottom] 68 Color = clSkyBlue 69 object Chart1LineSeries1: TLineSeries 70 LinePen.Color = clBlue 71 LinePen.Width = 3 72 Source = RandomChartSource1 73 end 74 object Chart1BarSeries1: TBarSeries 75 Transparency = 127 76 BarBrush.Color = clGreen 77 Source = RandomChartSource1 78 end 79 object Chart1PieSeries1: TPieSeries 80 Source = RandomChartSource1 81 end 82 end 83 object Bevel1: TBevel 84 AnchorSideLeft.Control = Owner 85 AnchorSideLeft.Side = asrCenter 86 Left = 343 87 Height = 50 88 Top = 73 89 Width = 2 90 end 91 object RandomChartSource1: TRandomChartSource 92 PointsNumber = 10 93 RandSeed = 1792875960 94 XMax = 10 95 XMin = 0 96 YMax = 10 97 YMin = 0 98 left = 210 99 top = 161 100 end 101end 102