mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-05-04 13:24:05 +02:00
56 lines
1.3 KiB
Plaintext
56 lines
1.3 KiB
Plaintext
object Form1: TForm1
|
|
Left = 318
|
|
Height = 300
|
|
Top = 151
|
|
Width = 400
|
|
Caption = 'Form1'
|
|
ClientHeight = 300
|
|
ClientWidth = 400
|
|
OnCreate = FormCreate
|
|
LCLVersion = '0.9.29'
|
|
object Chart1: TChart
|
|
Left = 0
|
|
Height = 300
|
|
Top = 0
|
|
Width = 400
|
|
AxisList = <
|
|
item
|
|
Alignment = calLeft
|
|
Title.Font.Orientation = 900
|
|
Transformation.Offset = 0
|
|
Transformation.Scale = 1
|
|
end
|
|
item
|
|
Alignment = calBottom
|
|
Transformation.Offset = 0
|
|
Transformation.Scale = 1
|
|
end>
|
|
Foot.Brush.Color = clBtnFace
|
|
Foot.Font.Color = clBlue
|
|
Title.Brush.Color = clBtnFace
|
|
Title.Font.Color = clBlue
|
|
Title.Text.Strings = (
|
|
'You can drag data points'
|
|
'while holding Shift key'
|
|
)
|
|
Title.Visible = True
|
|
Align = alClient
|
|
DoubleBuffered = True
|
|
ParentColor = False
|
|
OnMouseDown = Chart1MouseDown
|
|
OnMouseMove = Chart1MouseMove
|
|
OnMouseUp = Chart1MouseUp
|
|
object Chart1LineSeries1: TLineSeries
|
|
Marks.Clipped = False
|
|
Marks.Format = '%0:.9g'
|
|
Marks.Style = smsValue
|
|
Pointer.Brush.Color = clPurple
|
|
Pointer.HorizSize = 6
|
|
Pointer.Style = psDiamond
|
|
Pointer.VertSize = 6
|
|
SeriesColor = clBlack
|
|
ShowPoints = True
|
|
end
|
|
end
|
|
end
|