mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-05-22 11:24:13 +02:00
318 lines
8.3 KiB
Plaintext
318 lines
8.3 KiB
Plaintext
object Form1: TForm1
|
|
Left = 461
|
|
Height = 430
|
|
Top = 151
|
|
Width = 592
|
|
Caption = 'Form1'
|
|
ClientHeight = 430
|
|
ClientWidth = 592
|
|
Position = poScreenCenter
|
|
LCLVersion = '2.1.0.0'
|
|
object pcMain: TPageControl
|
|
Left = 0
|
|
Height = 364
|
|
Top = 0
|
|
Width = 592
|
|
ActivePage = tsBar
|
|
Align = alClient
|
|
TabIndex = 0
|
|
TabOrder = 0
|
|
object tsBar: TTabSheet
|
|
Caption = 'Bar'
|
|
ClientHeight = 336
|
|
ClientWidth = 584
|
|
object Chart1: TChart
|
|
Left = 0
|
|
Height = 336
|
|
Top = 0
|
|
Width = 584
|
|
AxisList = <
|
|
item
|
|
TickLength = 0
|
|
Marks.Distance = 4
|
|
Marks.LabelBrush.Color = clSkyBlue
|
|
Minors = <>
|
|
Title.LabelFont.Orientation = 900
|
|
Title.Visible = True
|
|
Title.Caption = 'Left axis title'
|
|
end
|
|
item
|
|
Alignment = calBottom
|
|
AxisPen.Visible = True
|
|
Marks.LabelBrush.Color = clSkyBlue
|
|
Minors = <>
|
|
Title.Visible = True
|
|
Title.Caption = 'Bottom axis title'
|
|
Title.Frame.Style = psSolid
|
|
Title.LabelBrush.Style = bsClear
|
|
end>
|
|
Foot.Brush.Color = clBtnFace
|
|
Foot.Font.Color = clBlue
|
|
Frame.Visible = False
|
|
Margins.Bottom = 0
|
|
Title.Brush.Color = clBtnFace
|
|
Title.Font.Color = clBlue
|
|
Title.Text.Strings = (
|
|
'TAChart'
|
|
)
|
|
Align = alClient
|
|
object Chart1BarSeries1: TBarSeries
|
|
Marks.Margins.Left = 8
|
|
Marks.Margins.Top = 5
|
|
Marks.Margins.Right = 8
|
|
Marks.Margins.Bottom = 5
|
|
Marks.Arrow.BaseLength = 3
|
|
Marks.Arrow.Length = 9
|
|
Marks.Arrow.Visible = True
|
|
Marks.Arrow.Width = 4
|
|
Marks.Format = '%1:.2f%%'
|
|
Marks.Frame.Color = 31097
|
|
Marks.Frame.Width = 2
|
|
Marks.Style = smsPercent
|
|
BarBrush.Color = 1410280
|
|
Source = RandomChartSource1
|
|
end
|
|
end
|
|
end
|
|
object Multiline: TTabSheet
|
|
Caption = 'Multiline'
|
|
ClientHeight = 336
|
|
ClientWidth = 584
|
|
object ChartMulti: TChart
|
|
Left = 0
|
|
Height = 336
|
|
Top = 0
|
|
Width = 584
|
|
AxisList = <
|
|
item
|
|
Marks.Alignment = taCenter
|
|
Marks.LabelFont.Orientation = 900
|
|
Marks.Frame.Style = psSolid
|
|
Marks.LabelBrush.Style = bsClear
|
|
Minors = <>
|
|
Title.LabelFont.Orientation = 900
|
|
Title.LabelBrush.Style = bsClear
|
|
OnMarkToText = ChartMultiAxisList1MarkToText
|
|
end
|
|
item
|
|
Alignment = calBottom
|
|
Marks.Frame.Style = psSolid
|
|
Marks.LabelBrush.Style = bsClear
|
|
Minors = <>
|
|
Title.Visible = True
|
|
Title.Caption = 'test'
|
|
Title.LabelBrush.Style = bsClear
|
|
OnMarkToText = ChartMultiAxisList1MarkToText
|
|
end>
|
|
Foot.Brush.Color = clBtnFace
|
|
Foot.Font.Color = clBlue
|
|
Foot.Text.Strings = (
|
|
'TAChart'
|
|
)
|
|
Title.Brush.Color = clBtnFace
|
|
Title.Brush.Style = bsClear
|
|
Title.Font.Color = clBlue
|
|
Title.Text.Strings = (
|
|
'Chart long'
|
|
'title'
|
|
)
|
|
Title.Visible = True
|
|
Align = alClient
|
|
object ChartMultiLineSeries1: TLineSeries
|
|
Source = RandomChartSource1
|
|
end
|
|
end
|
|
end
|
|
end
|
|
object pnlControls: TPanel
|
|
Left = 0
|
|
Height = 66
|
|
Top = 364
|
|
Width = 592
|
|
Align = alBottom
|
|
AutoSize = True
|
|
BevelOuter = bvNone
|
|
ClientHeight = 66
|
|
ClientWidth = 592
|
|
TabOrder = 1
|
|
object cbHideOverlapping: TCheckBox
|
|
AnchorSideLeft.Control = gbAngles
|
|
AnchorSideLeft.Side = asrBottom
|
|
AnchorSideTop.Control = pnlControls
|
|
Left = 420
|
|
Height = 19
|
|
Top = 8
|
|
Width = 144
|
|
BorderSpacing.Left = 16
|
|
BorderSpacing.Top = 8
|
|
Caption = 'Hide overlapping labels'
|
|
OnChange = cbHideOverlappingChange
|
|
TabOrder = 0
|
|
end
|
|
object gbAngles: TGroupBox
|
|
Left = 0
|
|
Height = 66
|
|
Top = 0
|
|
Width = 404
|
|
Align = alLeft
|
|
AutoSize = True
|
|
Caption = ' Angles '
|
|
ClientHeight = 46
|
|
ClientWidth = 400
|
|
TabOrder = 1
|
|
object seAxisAngle: TSpinEdit
|
|
AnchorSideLeft.Control = lblAxisAngle
|
|
AnchorSideLeft.Side = asrBottom
|
|
AnchorSideTop.Control = gbAngles
|
|
Left = 37
|
|
Height = 23
|
|
Top = 8
|
|
Width = 50
|
|
BorderSpacing.Left = 8
|
|
BorderSpacing.Top = 8
|
|
BorderSpacing.Bottom = 8
|
|
Increment = 5
|
|
MaxValue = 360
|
|
MinValue = -360
|
|
OnChange = seAxisAngleChange
|
|
TabOrder = 0
|
|
end
|
|
object lblAxisAngle: TLabel
|
|
AnchorSideLeft.Control = gbAngles
|
|
AnchorSideTop.Control = seAxisAngle
|
|
AnchorSideTop.Side = asrCenter
|
|
Left = 8
|
|
Height = 15
|
|
Top = 12
|
|
Width = 21
|
|
BorderSpacing.Left = 8
|
|
Caption = 'Axis'
|
|
ParentColor = False
|
|
end
|
|
object lblSeriesAngle: TLabel
|
|
AnchorSideLeft.Control = seAxisAngle
|
|
AnchorSideLeft.Side = asrBottom
|
|
AnchorSideTop.Control = seSeriesAngle
|
|
AnchorSideTop.Side = asrCenter
|
|
Left = 103
|
|
Height = 15
|
|
Top = 12
|
|
Width = 30
|
|
BorderSpacing.Left = 16
|
|
Caption = 'Series'
|
|
ParentColor = False
|
|
end
|
|
object seSeriesAngle: TSpinEdit
|
|
AnchorSideLeft.Control = lblSeriesAngle
|
|
AnchorSideLeft.Side = asrBottom
|
|
AnchorSideTop.Control = gbAngles
|
|
Left = 141
|
|
Height = 23
|
|
Top = 8
|
|
Width = 50
|
|
BorderSpacing.Left = 8
|
|
BorderSpacing.Top = 8
|
|
BorderSpacing.Bottom = 8
|
|
Increment = 5
|
|
MaxValue = 360
|
|
MinValue = -360
|
|
OnChange = seSeriesAngleChange
|
|
TabOrder = 1
|
|
end
|
|
object lblTitleAngle: TLabel
|
|
AnchorSideLeft.Control = seSeriesAngle
|
|
AnchorSideLeft.Side = asrBottom
|
|
AnchorSideTop.Control = seTitleAngle
|
|
AnchorSideTop.Side = asrCenter
|
|
Left = 207
|
|
Height = 15
|
|
Top = 12
|
|
Width = 23
|
|
BorderSpacing.Left = 16
|
|
Caption = 'Title'
|
|
ParentColor = False
|
|
end
|
|
object seTitleAngle: TSpinEdit
|
|
AnchorSideLeft.Control = lblTitleAngle
|
|
AnchorSideLeft.Side = asrBottom
|
|
AnchorSideTop.Control = gbAngles
|
|
Left = 238
|
|
Height = 23
|
|
Top = 8
|
|
Width = 50
|
|
BorderSpacing.Left = 8
|
|
BorderSpacing.Top = 8
|
|
BorderSpacing.Bottom = 8
|
|
Increment = 5
|
|
MaxValue = 360
|
|
MinValue = -360
|
|
OnChange = seTitleAngleChange
|
|
TabOrder = 2
|
|
end
|
|
object seCalloutAngle: TSpinEdit
|
|
AnchorSideLeft.Control = lblCalloutAngle
|
|
AnchorSideLeft.Side = asrBottom
|
|
AnchorSideTop.Control = gbAngles
|
|
Left = 350
|
|
Height = 23
|
|
Top = 8
|
|
Width = 50
|
|
BorderSpacing.Left = 8
|
|
BorderSpacing.Top = 8
|
|
BorderSpacing.Bottom = 8
|
|
Increment = 5
|
|
MaxValue = 120
|
|
OnChange = seCalloutAngleChange
|
|
TabOrder = 3
|
|
end
|
|
object lblCalloutAngle: TLabel
|
|
AnchorSideLeft.Control = seTitleAngle
|
|
AnchorSideLeft.Side = asrBottom
|
|
AnchorSideTop.Control = seCalloutAngle
|
|
AnchorSideTop.Side = asrCenter
|
|
Left = 304
|
|
Height = 15
|
|
Top = 12
|
|
Width = 38
|
|
BorderSpacing.Left = 16
|
|
Caption = 'Callout'
|
|
ParentColor = False
|
|
end
|
|
end
|
|
object cbShape: TComboBox
|
|
AnchorSideLeft.Control = cbHideOverlapping
|
|
AnchorSideTop.Control = cbHideOverlapping
|
|
AnchorSideTop.Side = asrBottom
|
|
Left = 420
|
|
Height = 23
|
|
Top = 35
|
|
Width = 160
|
|
BorderSpacing.Top = 8
|
|
BorderSpacing.Bottom = 8
|
|
ItemHeight = 15
|
|
ItemIndex = 0
|
|
Items.Strings = (
|
|
'Rectangle'
|
|
'Ellipse'
|
|
'Rounded corners'
|
|
'Rounded sides'
|
|
'User-defined'
|
|
)
|
|
OnChange = cbShapeChange
|
|
Style = csDropDownList
|
|
TabOrder = 2
|
|
Text = 'Rectangle'
|
|
end
|
|
end
|
|
object RandomChartSource1: TRandomChartSource
|
|
PointsNumber = 15
|
|
RandSeed = 567673250
|
|
XMax = 15
|
|
XMin = 0
|
|
YMax = 15
|
|
YMin = 10
|
|
left = 342
|
|
top = 94
|
|
end
|
|
end
|