mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-07-21 12:06:03 +02:00
144 lines
3.2 KiB
Plaintext
144 lines
3.2 KiB
Plaintext
object Form1: TForm1
|
|
Left = 280
|
|
Height = 334
|
|
Top = 130
|
|
Width = 725
|
|
Caption = 'Form1'
|
|
ClientHeight = 334
|
|
ClientWidth = 725
|
|
LCLVersion = '2.3.0.0'
|
|
object Chart1: TChart
|
|
Left = 0
|
|
Height = 296
|
|
Top = 0
|
|
Width = 601
|
|
AxisList = <
|
|
item
|
|
Grid.Color = clSilver
|
|
Grid.Style = psSolid
|
|
Marks.LabelBrush.Style = bsClear
|
|
Minors = <>
|
|
Title.LabelFont.Orientation = 900
|
|
Title.LabelBrush.Style = bsClear
|
|
end
|
|
item
|
|
Grid.Visible = False
|
|
Alignment = calBottom
|
|
Marks.LabelBrush.Style = bsClear
|
|
Minors = <>
|
|
Title.LabelBrush.Style = bsClear
|
|
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'
|
|
)
|
|
Align = alClient
|
|
object Chart1BarSeries1: TBarSeries
|
|
Legend.Multiplicity = lmStyle
|
|
BarBrush.Color = clRed
|
|
Source = CalculatedChartSource1
|
|
Styles = ChartStyles1
|
|
end
|
|
end
|
|
object Panel1: TPanel
|
|
Left = 0
|
|
Height = 38
|
|
Top = 296
|
|
Width = 725
|
|
Align = alBottom
|
|
BevelOuter = bvNone
|
|
ClientHeight = 38
|
|
ClientWidth = 725
|
|
TabOrder = 1
|
|
object BtnAddBar: TButton
|
|
AnchorSideLeft.Control = Panel1
|
|
AnchorSideTop.Control = Panel1
|
|
AnchorSideTop.Side = asrCenter
|
|
Left = 8
|
|
Height = 25
|
|
Top = 7
|
|
Width = 68
|
|
AutoSize = True
|
|
BorderSpacing.Left = 8
|
|
Caption = 'Add bar'
|
|
OnClick = BtnAddBarClick
|
|
TabOrder = 0
|
|
end
|
|
object BtnAddLevel: TButton
|
|
AnchorSideLeft.Control = BtnAddBar
|
|
AnchorSideLeft.Side = asrBottom
|
|
AnchorSideTop.Control = Panel1
|
|
AnchorSideTop.Side = asrCenter
|
|
Left = 84
|
|
Height = 25
|
|
Top = 7
|
|
Width = 75
|
|
AutoSize = True
|
|
BorderSpacing.Left = 8
|
|
Caption = 'Add level'
|
|
OnClick = BtnAddLevelClick
|
|
TabOrder = 1
|
|
end
|
|
object CbPercent: TCheckBox
|
|
AnchorSideLeft.Control = BtnAddLevel
|
|
AnchorSideLeft.Side = asrBottom
|
|
AnchorSideTop.Control = Panel1
|
|
AnchorSideTop.Side = asrCenter
|
|
Left = 167
|
|
Height = 19
|
|
Top = 10
|
|
Width = 48
|
|
BorderSpacing.Left = 8
|
|
Caption = '100%'
|
|
OnChange = CbPercentChange
|
|
TabOrder = 2
|
|
end
|
|
object BtnDelete: TButton
|
|
AnchorSideTop.Control = Panel1
|
|
AnchorSideTop.Side = asrCenter
|
|
AnchorSideRight.Control = Panel1
|
|
AnchorSideRight.Side = asrBottom
|
|
Left = 612
|
|
Height = 25
|
|
Top = 7
|
|
Width = 105
|
|
Anchors = [akTop, akRight]
|
|
AutoSize = True
|
|
BorderSpacing.Right = 8
|
|
Caption = 'Delete selected'
|
|
Enabled = False
|
|
OnClick = BtnDeleteClick
|
|
TabOrder = 3
|
|
end
|
|
end
|
|
object ListBox1: TListBox
|
|
Left = 609
|
|
Height = 280
|
|
Top = 8
|
|
Width = 108
|
|
Align = alRight
|
|
BorderSpacing.Around = 8
|
|
ItemHeight = 0
|
|
TabOrder = 2
|
|
end
|
|
object ListChartSource1: TListChartSource
|
|
Left = 117
|
|
Top = 57
|
|
end
|
|
object CalculatedChartSource1: TCalculatedChartSource
|
|
Origin = ListChartSource1
|
|
Left = 116
|
|
Top = 112
|
|
end
|
|
object ChartStyles1: TChartStyles
|
|
Styles = <>
|
|
Left = 268
|
|
Top = 58
|
|
end
|
|
end
|