mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-07-22 22:28:20 +02:00
118 lines
2.3 KiB
Plaintext
118 lines
2.3 KiB
Plaintext
object Form1: TForm1
|
|
Left = 280
|
|
Height = 334
|
|
Top = 130
|
|
Width = 725
|
|
Caption = 'Form1'
|
|
ClientHeight = 334
|
|
ClientWidth = 725
|
|
LCLVersion = '1.7'
|
|
object Chart1: TChart
|
|
Left = 0
|
|
Height = 296
|
|
Top = 0
|
|
Width = 601
|
|
AxisList = <
|
|
item
|
|
Grid.Color = clSilver
|
|
Grid.Style = psSolid
|
|
Minors = <>
|
|
Title.LabelFont.Orientation = 900
|
|
end
|
|
item
|
|
Grid.Visible = False
|
|
Alignment = calBottom
|
|
Minors = <>
|
|
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
|
|
Left = 11
|
|
Height = 25
|
|
Top = 4
|
|
Width = 75
|
|
Caption = 'Add bar'
|
|
OnClick = BtnAddBarClick
|
|
TabOrder = 0
|
|
end
|
|
object BtnAddLevel: TButton
|
|
Left = 99
|
|
Height = 25
|
|
Top = 4
|
|
Width = 75
|
|
Caption = 'Add level'
|
|
OnClick = BtnAddLevelClick
|
|
TabOrder = 1
|
|
end
|
|
object CbPercent: TCheckBox
|
|
Left = 191
|
|
Height = 19
|
|
Top = 7
|
|
Width = 48
|
|
Caption = '100%'
|
|
OnChange = CbPercentChange
|
|
TabOrder = 2
|
|
end
|
|
object BtnDelete: TButton
|
|
Left = 610
|
|
Height = 25
|
|
Top = 4
|
|
Width = 107
|
|
Anchors = [akTop, akRight]
|
|
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
|