mirror of
				https://gitlab.com/freepascal.org/lazarus/lazarus.git
				synced 2025-10-31 23:49:22 +01:00 
			
		
		
		
	
		
			
				
	
	
		
			74 lines
		
	
	
		
			1.6 KiB
		
	
	
	
		
			Plaintext
		
	
	
	
	
	
			
		
		
	
	
			74 lines
		
	
	
		
			1.6 KiB
		
	
	
	
		
			Plaintext
		
	
	
	
	
	
| object Form1: TForm1
 | |
|   Left = 308
 | |
|   Height = 319
 | |
|   Top = 132
 | |
|   Width = 684
 | |
|   Caption = 'Form1'
 | |
|   ClientHeight = 319
 | |
|   ClientWidth = 684
 | |
|   LCLVersion = '1.1'
 | |
|   object OpenGLControl1: TOpenGLControl
 | |
|     Left = 344
 | |
|     Height = 319
 | |
|     Top = 0
 | |
|     Width = 340
 | |
|     Align = alClient
 | |
|     AutoResizeViewport = True
 | |
|     OnPaint = OpenGLControl1Paint
 | |
|   end
 | |
|   object Chart1: TChart
 | |
|     Left = 0
 | |
|     Height = 319
 | |
|     Top = 0
 | |
|     Width = 344
 | |
|     AxisList = <    
 | |
|       item
 | |
|         Marks.LabelFont.Color = clTeal
 | |
|         Marks.Frame.Style = psSolid
 | |
|         Marks.LabelBrush.Color = clYellow
 | |
|         Marks.LabelBrush.Style = bsSolid
 | |
|         Minors = <>
 | |
|         Title.LabelFont.Orientation = 900
 | |
|       end    
 | |
|       item
 | |
|         Alignment = calBottom
 | |
|         Minors = <>
 | |
|       end>
 | |
|     Foot.Brush.Color = clBtnFace
 | |
|     Foot.Font.Color = clBlue
 | |
|     Title.Brush.Color = clSilver
 | |
|     Title.Font.Color = clBlue
 | |
|     Title.Text.Strings = (
 | |
|       'Standard'
 | |
|     )
 | |
|     Title.Visible = True
 | |
|     OnAfterPaint = Chart1AfterPaint
 | |
|     Align = alLeft
 | |
|     Color = clSkyBlue
 | |
|     ParentColor = False
 | |
|     object Chart1LineSeries1: TLineSeries
 | |
|       LinePen.Color = clBlue
 | |
|       LinePen.Width = 3
 | |
|       Source = RandomChartSource1
 | |
|     end
 | |
|     object Chart1BarSeries1: TBarSeries
 | |
|       Transparency = 127
 | |
|       BarBrush.Color = clGreen
 | |
|       Source = RandomChartSource1
 | |
|     end
 | |
|     object Chart1PieSeries1: TPieSeries
 | |
|       Source = RandomChartSource1
 | |
|     end
 | |
|   end
 | |
|   object RandomChartSource1: TRandomChartSource
 | |
|     PointsNumber = 10
 | |
|     RandSeed = 1792875960
 | |
|     XMax = 10
 | |
|     XMin = 0
 | |
|     YMax = 10
 | |
|     YMin = 0
 | |
|     left = 210
 | |
|     top = 161
 | |
|   end
 | |
| end
 | 
