mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-05-02 03:23:39 +02:00
124 lines
2.7 KiB
Plaintext
124 lines
2.7 KiB
Plaintext
object Form1: TForm1
|
|
Left = 352
|
|
Height = 356
|
|
Top = 169
|
|
Width = 613
|
|
Caption = 'Form1'
|
|
ClientHeight = 356
|
|
ClientWidth = 613
|
|
OnCreate = FormCreate
|
|
OnDestroy = FormDestroy
|
|
LCLVersion = '1.1'
|
|
object Chart1: TChart
|
|
Left = 0
|
|
Height = 316
|
|
Top = 0
|
|
Width = 316
|
|
AxisList = <
|
|
item
|
|
Visible = False
|
|
Minors = <>
|
|
Title.LabelFont.Orientation = 900
|
|
end
|
|
item
|
|
Visible = False
|
|
Alignment = calBottom
|
|
Minors = <>
|
|
end>
|
|
BackColor = clSkyBlue
|
|
Foot.Brush.Color = clBtnFace
|
|
Foot.Font.Color = clBlue
|
|
Legend.Visible = True
|
|
Title.Brush.Color = clBlack
|
|
Title.Brush.Style = bsClear
|
|
Title.Font.Color = clBlue
|
|
Title.Font.Height = -13
|
|
Title.Font.Name = 'Verdana'
|
|
Title.Text.Strings = (
|
|
'Standard'
|
|
)
|
|
Title.Visible = True
|
|
OnAfterPaint = Chart1AfterPaint
|
|
Align = alClient
|
|
Color = clMoneyGreen
|
|
ParentColor = False
|
|
object Chart1PieSeries1: TPieSeries
|
|
Marks.LabelFont.Height = 10
|
|
Source = RandomChartSource1
|
|
end
|
|
object Chart1ConstantLine1: TConstantLine
|
|
Pen.Color = clGreen
|
|
Pen.Width = 3
|
|
Position = 0
|
|
end
|
|
object Chart1BarSeries1: TBarSeries
|
|
Active = False
|
|
ZPosition = 1
|
|
BarBrush.Color = clRed
|
|
Source = RandomChartSource1
|
|
end
|
|
object Chart1AreaSeries1: TAreaSeries
|
|
Active = False
|
|
ZPosition = 2
|
|
AreaContourPen.Width = 3
|
|
Source = RandomChartSource1
|
|
end
|
|
object Chart1LineSeries1: TLineSeries
|
|
Transparency = 128
|
|
Marks.Format = '%2:s %1:.2f%%'
|
|
Marks.Style = smsLabelPercent
|
|
Title = 'Line'
|
|
ZPosition = 3
|
|
LinePen.Color = clAqua
|
|
LinePen.Width = 3
|
|
Pointer.Brush.Color = clYellow
|
|
Pointer.HorizSize = 2
|
|
Pointer.Style = psRightBracket
|
|
Pointer.VertSize = 10
|
|
ShowPoints = True
|
|
Source = RandomChartSource1
|
|
end
|
|
end
|
|
object PaintBox1: TPaintBox
|
|
Left = 316
|
|
Height = 316
|
|
Top = 0
|
|
Width = 297
|
|
Align = alRight
|
|
OnPaint = PaintBox1Paint
|
|
end
|
|
object Panel1: TPanel
|
|
Left = 0
|
|
Height = 40
|
|
Top = 316
|
|
Width = 613
|
|
Align = alBottom
|
|
ClientHeight = 40
|
|
ClientWidth = 613
|
|
TabOrder = 1
|
|
object cbAggPas: TCheckBox
|
|
Left = 8
|
|
Height = 17
|
|
Top = 12
|
|
Width = 181
|
|
Caption = 'Use AggPas for standard drawing'
|
|
OnClick = cbAggPasClick
|
|
TabOrder = 0
|
|
end
|
|
end
|
|
object RandomChartSource1: TRandomChartSource
|
|
PointsNumber = 10
|
|
RandSeed = 1733195749
|
|
XMax = 10
|
|
XMin = 0
|
|
YMax = 10
|
|
YMin = 1
|
|
left = 90
|
|
top = 210
|
|
end
|
|
object ChartGUIConnectorAggPas1: TChartGUIConnectorAggPas
|
|
left = 380
|
|
top = 136
|
|
end
|
|
end
|