mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-07-21 18:46:16 +02:00
353 lines
8.8 KiB
Plaintext
353 lines
8.8 KiB
Plaintext
object Form1: TForm1
|
|
Left = 529
|
|
Height = 511
|
|
Top = 174
|
|
Width = 590
|
|
Caption = 'Form1'
|
|
ClientHeight = 511
|
|
ClientWidth = 590
|
|
OnCreate = FormCreate
|
|
OnDestroy = FormDestroy
|
|
Position = poScreenCenter
|
|
LCLVersion = '1.3'
|
|
object PageControl1: TPageControl
|
|
Left = 0
|
|
Height = 511
|
|
Top = 0
|
|
Width = 590
|
|
ActivePage = TabSheet1
|
|
Align = alClient
|
|
TabIndex = 0
|
|
TabOrder = 0
|
|
object TabSheet1: TTabSheet
|
|
Caption = 'Basic'
|
|
ClientHeight = 483
|
|
ClientWidth = 582
|
|
object pnControls: TPanel
|
|
Left = 0
|
|
Height = 134
|
|
Top = 349
|
|
Width = 582
|
|
Align = alBottom
|
|
ClientHeight = 134
|
|
ClientWidth = 582
|
|
TabOrder = 0
|
|
object lblMarginY: TLabel
|
|
Left = 8
|
|
Height = 15
|
|
Top = 33
|
|
Width = 48
|
|
Caption = 'Y margin'
|
|
ParentColor = False
|
|
end
|
|
object seMarginY: TSpinEdit
|
|
Left = 68
|
|
Height = 23
|
|
Top = 33
|
|
Width = 54
|
|
MaxValue = 20
|
|
OnChange = seMarginYChange
|
|
TabOrder = 0
|
|
Value = 4
|
|
end
|
|
object seSymbolWidth: TSpinEdit
|
|
Left = 212
|
|
Height = 23
|
|
Top = 8
|
|
Width = 54
|
|
MaxValue = 50
|
|
OnChange = seSymbolWidthChange
|
|
TabOrder = 1
|
|
Value = 20
|
|
end
|
|
object lblSymbolWidth: TLabel
|
|
Left = 128
|
|
Height = 15
|
|
Top = 8
|
|
Width = 73
|
|
Caption = 'Symbol width'
|
|
ParentColor = False
|
|
end
|
|
object rgAlignment: TRadioGroup
|
|
Left = 283
|
|
Height = 132
|
|
Top = 1
|
|
Width = 298
|
|
Align = alRight
|
|
AutoFill = True
|
|
Caption = ' Alignment '
|
|
ChildSizing.LeftRightSpacing = 6
|
|
ChildSizing.TopBottomSpacing = 6
|
|
ChildSizing.EnlargeHorizontal = crsHomogenousChildResize
|
|
ChildSizing.EnlargeVertical = crsHomogenousChildResize
|
|
ChildSizing.ShrinkHorizontal = crsScaleChilds
|
|
ChildSizing.ShrinkVertical = crsScaleChilds
|
|
ChildSizing.Layout = cclTopToBottomThenLeftToRight
|
|
ChildSizing.ControlsPerLine = 3
|
|
ClientHeight = 114
|
|
ClientWidth = 294
|
|
Columns = 3
|
|
ItemIndex = 6
|
|
Items.Strings = (
|
|
'TopLeft'
|
|
'CenterLeft'
|
|
'BottomLeft'
|
|
'TopCenter'
|
|
''
|
|
'BottomCenter'
|
|
'TopRight'
|
|
'CenterRight'
|
|
'BottomRight'
|
|
)
|
|
OnClick = rgAlignmentClick
|
|
TabOrder = 2
|
|
end
|
|
object cbUseSidebar: TCheckBox
|
|
Left = 8
|
|
Height = 19
|
|
Top = 60
|
|
Width = 59
|
|
Caption = 'Sidebar'
|
|
Checked = True
|
|
OnChange = cbUseSidebarChange
|
|
State = cbChecked
|
|
TabOrder = 3
|
|
end
|
|
object lblSpacing: TLabel
|
|
Left = 128
|
|
Height = 15
|
|
Top = 33
|
|
Width = 42
|
|
Caption = 'Spacing'
|
|
ParentColor = False
|
|
end
|
|
object seSpacing: TSpinEdit
|
|
Left = 212
|
|
Height = 23
|
|
Top = 33
|
|
Width = 54
|
|
MaxValue = 20
|
|
OnChange = seSpacingChange
|
|
TabOrder = 4
|
|
Value = 4
|
|
end
|
|
object lblMarginX: TLabel
|
|
Left = 8
|
|
Height = 15
|
|
Top = 8
|
|
Width = 48
|
|
Caption = 'X margin'
|
|
ParentColor = False
|
|
end
|
|
object seMarginX: TSpinEdit
|
|
Left = 68
|
|
Height = 23
|
|
Top = 8
|
|
Width = 54
|
|
MaxValue = 20
|
|
OnChange = seMarginXChange
|
|
TabOrder = 5
|
|
Value = 4
|
|
end
|
|
object cbSeries: TComboBox
|
|
Left = 102
|
|
Height = 22
|
|
Top = 91
|
|
Width = 164
|
|
ItemHeight = 16
|
|
OnDrawItem = cbSeriesDrawItem
|
|
ReadOnly = True
|
|
Style = csOwnerDrawFixed
|
|
TabOrder = 6
|
|
end
|
|
object lblColumnCount: TLabel
|
|
Left = 128
|
|
Height = 15
|
|
Top = 60
|
|
Width = 48
|
|
Caption = 'Columns'
|
|
ParentColor = False
|
|
end
|
|
object seColumnCount: TSpinEdit
|
|
Left = 212
|
|
Height = 23
|
|
Top = 60
|
|
Width = 54
|
|
MinValue = 1
|
|
OnChange = seColumnCountChange
|
|
TabOrder = 7
|
|
Value = 1
|
|
end
|
|
object cbByRows: TCheckBox
|
|
Left = 8
|
|
Height = 19
|
|
Top = 84
|
|
Width = 61
|
|
Caption = 'By rows'
|
|
OnChange = cbByRowsChange
|
|
TabOrder = 8
|
|
end
|
|
object cbGrid: TCheckBox
|
|
Left = 8
|
|
Height = 19
|
|
Top = 108
|
|
Width = 42
|
|
Caption = 'Grid'
|
|
OnChange = cbGridChange
|
|
TabOrder = 9
|
|
end
|
|
end
|
|
object Chart1: TChart
|
|
Left = 0
|
|
Height = 349
|
|
Top = 0
|
|
Width = 582
|
|
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.BackgroundBrush.Color = clMoneyGreen
|
|
Legend.GridHorizontal.Style = psDot
|
|
Legend.GridVertical.Style = psDot
|
|
Legend.GroupFont.Style = [fsBold]
|
|
Legend.GroupTitles.Strings = (
|
|
'Pie'
|
|
)
|
|
Legend.Visible = True
|
|
Title.Brush.Color = clBtnFace
|
|
Title.Font.Color = clBlue
|
|
Title.Text.Strings = (
|
|
'TAChart'
|
|
)
|
|
Align = alClient
|
|
Color = clOlive
|
|
ParentColor = False
|
|
object Chart1LineSeries1: TLineSeries
|
|
Title = 'Line'
|
|
LinePen.Color = clRed
|
|
Pointer.Brush.Color = clRed
|
|
ShowPoints = True
|
|
end
|
|
object Chart1AreaSeries1: TAreaSeries
|
|
Title = 'Area'
|
|
AreaBrush.Color = clGreen
|
|
AreaBrush.Style = bsCross
|
|
Source = RandomChartSource1
|
|
end
|
|
object Chart1PieSeries1: TPieSeries
|
|
Legend.Format = '%2:s %1:.2f%%'
|
|
Legend.GroupIndex = 0
|
|
Legend.Multiplicity = lmPoint
|
|
Marks.Format = '%2:s'
|
|
Marks.Style = smsLabel
|
|
Title = 'Pie'
|
|
Exploded = True
|
|
Source = ListChartSource2
|
|
end
|
|
object Chart1FuncSeries1: TFuncSeries
|
|
Legend.Order = 1
|
|
Legend.UserItemsCount = 2
|
|
Legend.OnDraw = Chart1FuncSeries1DrawLegend
|
|
Extent.UseXMax = True
|
|
Extent.UseXMin = True
|
|
Extent.XMax = 5
|
|
Title = 'Function'
|
|
OnCalculate = Chart1FuncSeries1Calculate
|
|
Pen.Color = clPurple
|
|
Pen.Width = 2
|
|
end
|
|
end
|
|
end
|
|
object TabSheet2: TTabSheet
|
|
Caption = 'OwnerDraw'
|
|
ClientHeight = 483
|
|
ClientWidth = 582
|
|
object Chart2: TChart
|
|
Left = 0
|
|
Height = 483
|
|
Top = 0
|
|
Width = 582
|
|
AxisList = <
|
|
item
|
|
Grid.Color = clSilver
|
|
Minors = <>
|
|
Title.LabelFont.Height = -16
|
|
Title.LabelFont.Orientation = 900
|
|
Title.LabelFont.Style = [fsBold]
|
|
Title.Visible = True
|
|
Title.Caption = 'y axis'
|
|
end
|
|
item
|
|
Grid.Visible = False
|
|
Alignment = calBottom
|
|
Minors = <>
|
|
Title.LabelFont.Height = -16
|
|
Title.LabelFont.Style = [fsBold]
|
|
Title.Visible = True
|
|
Title.Caption = 'x axis'
|
|
end>
|
|
BackColor = clWhite
|
|
Foot.Brush.Color = clBtnFace
|
|
Foot.Font.Color = clBlue
|
|
Legend.Visible = True
|
|
Title.Brush.Color = clBtnFace
|
|
Title.Font.Color = clBlue
|
|
Title.Text.Strings = (
|
|
'TAChart'
|
|
)
|
|
OnDrawLegend = Chart2DrawLegend
|
|
Align = alClient
|
|
ParentColor = False
|
|
object GradientLineSeries: TLineSeries
|
|
Title = '1.0'
|
|
LineType = ltNone
|
|
Pointer.Style = psCircle
|
|
ShowPoints = True
|
|
end
|
|
end
|
|
end
|
|
end
|
|
object RandomChartSource1: TRandomChartSource
|
|
PointsNumber = 7
|
|
RandSeed = 104675296
|
|
XMax = 10
|
|
XMin = 1
|
|
YMax = 10
|
|
YMin = 1
|
|
left = 380
|
|
top = 112
|
|
end
|
|
object ListChartSource1: TListChartSource
|
|
DataPoints.Strings = (
|
|
'0|0|?|'
|
|
'1|2|$00FF00|'
|
|
'2|5|?|'
|
|
'3|1|?|'
|
|
'4|6|?|'
|
|
)
|
|
left = 380
|
|
top = 168
|
|
end
|
|
object ListChartSource2: TListChartSource
|
|
DataPoints.Strings = (
|
|
'0|5|?|abcc'
|
|
'0|6|?|def'
|
|
'0.20000000000000001|4|?|пример'
|
|
'0|7|?|ещё'
|
|
'0|2|?|два слова'
|
|
)
|
|
left = 380
|
|
top = 228
|
|
end
|
|
end
|