lazarus/components/tachart/demo/nan/Main.lfm

148 lines
3.4 KiB
Plaintext

object Form1: TForm1
Left = 342
Height = 422
Top = 161
Width = 509
Caption = 'Check the value(s) to be set to NaN'
ClientHeight = 422
ClientWidth = 509
OnCreate = FormCreate
Position = poScreenCenter
LCLVersion = '2.3.0.0'
object Chart1: TChart
Left = 0
Height = 363
Top = 0
Width = 441
AxisList = <
item
Marks.LabelBrush.Style = bsClear
Minors = <>
Title.LabelFont.Orientation = 900
Title.LabelBrush.Style = bsClear
end
item
Alignment = calBottom
Marks.LabelBrush.Style = bsClear
Minors = <>
Title.LabelBrush.Style = bsClear
end>
Foot.Brush.Color = clBtnFace
Foot.Font.Color = clBlue
Title.Brush.Color = clBtnFace
Title.Font.Color = clBlue
Title.Text.Strings = (
'TAChart'
)
Align = alClient
object Chart1LineSeries1: TLineSeries
Pointer.Visible = True
ShowPoints = True
Source = lcs1
end
object Chart1BarSeries1: TBarSeries
Active = False
BarBrush.Color = clRed
Source = lcs1
end
object Chart1AreaSeries1: TAreaSeries
Active = False
Source = lcs1
end
object Chart1PieSeries1: TPieSeries
Active = False
Source = lcs1
end
end
object Panel2: TPanel
Left = 0
Height = 59
Top = 363
Width = 509
Align = alBottom
AutoSize = True
BevelOuter = bvNone
ClientHeight = 59
ClientWidth = 509
TabOrder = 1
object rgSeriesType: TRadioGroup
Left = 4
Height = 51
Top = 4
Width = 365
Align = alClient
AutoFill = True
BorderSpacing.Right = 16
BorderSpacing.Around = 4
Caption = ' Series type '
ChildSizing.LeftRightSpacing = 6
ChildSizing.TopBottomSpacing = 6
ChildSizing.EnlargeHorizontal = crsHomogenousChildResize
ChildSizing.EnlargeVertical = crsHomogenousChildResize
ChildSizing.ShrinkHorizontal = crsScaleChilds
ChildSizing.ShrinkVertical = crsScaleChilds
ChildSizing.Layout = cclLeftToRightThenTopToBottom
ChildSizing.ControlsPerLine = 10
ClientHeight = 31
ClientWidth = 361
Columns = 10
ItemIndex = 0
Items.Strings = (
'Line'
'Bar'
'Area'
'Pie'
)
OnClick = rgSeriesTypeClick
TabOrder = 0
end
object rgXY: TRadioGroup
Left = 389
Height = 51
Top = 4
Width = 116
Align = alRight
AutoFill = True
BorderSpacing.Around = 4
Caption = 'NaN in'
ChildSizing.LeftRightSpacing = 6
ChildSizing.TopBottomSpacing = 6
ChildSizing.EnlargeHorizontal = crsHomogenousChildResize
ChildSizing.EnlargeVertical = crsHomogenousChildResize
ChildSizing.ShrinkHorizontal = crsScaleChilds
ChildSizing.ShrinkVertical = crsScaleChilds
ChildSizing.Layout = cclLeftToRightThenTopToBottom
ChildSizing.ControlsPerLine = 2
ClientHeight = 31
ClientWidth = 112
Columns = 2
ItemIndex = 0
Items.Strings = (
'X'
'Y'
)
OnClick = rgXYClick
TabOrder = 1
end
end
object clbNans: TCheckListBox
Left = 445
Height = 355
Top = 4
Width = 60
Align = alRight
BorderSpacing.Around = 4
ItemHeight = 0
OnItemClick = clbNansItemClick
TabOrder = 2
end
object lcs1: TListChartSource
Left = 524
Top = 300
end
object lcs2: TListChartSource
Left = 524
Top = 352
end
end