1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106 107 108 109 110 111 112 113 114 115 116 117 118 119 120 121 122 123 124 125 126 127 128 129 130 131 132 133 134 135 136 137 138 139 140 141 142 143 144 145 146 147
|
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
|