mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-08-13 21:29:10 +02:00
TAChart: Update func demo with pointers in spline series
git-svn-id: trunk@31434 -
This commit is contained in:
parent
c7a345958f
commit
00841b0993
@ -213,11 +213,12 @@ object Form1: TForm1
|
|||||||
Title.LabelFont.Orientation = 900
|
Title.LabelFont.Orientation = 900
|
||||||
end
|
end
|
||||||
item
|
item
|
||||||
Alignment = calBottom
|
|
||||||
Grid.Color = clGray
|
Grid.Color = clGray
|
||||||
Grid.Cosmetic = False
|
Grid.Cosmetic = False
|
||||||
|
Alignment = calBottom
|
||||||
Minors = <>
|
Minors = <>
|
||||||
end>
|
end>
|
||||||
|
ExpandPercentage = 5
|
||||||
Foot.Brush.Color = clBtnFace
|
Foot.Brush.Color = clBtnFace
|
||||||
Foot.Font.Color = clBlue
|
Foot.Font.Color = clBlue
|
||||||
Title.Brush.Color = clBtnFace
|
Title.Brush.Color = clBtnFace
|
||||||
@ -235,11 +236,14 @@ object Form1: TForm1
|
|||||||
Source = RandomChartSource1
|
Source = RandomChartSource1
|
||||||
Pen.Color = clLime
|
Pen.Color = clLime
|
||||||
Pen.Width = 3
|
Pen.Width = 3
|
||||||
|
Pointer.Brush.Color = clLime
|
||||||
end
|
end
|
||||||
object ChartSplineCubicSplineSeries1: TCubicSplineSeries
|
object ChartSplineCubicSplineSeries1: TCubicSplineSeries
|
||||||
|
ZPosition = 1
|
||||||
Source = RandomChartSource1
|
Source = RandomChartSource1
|
||||||
Pen.Color = clAqua
|
Pen.Color = clAqua
|
||||||
Pen.Width = 2
|
Pen.Width = 2
|
||||||
|
Pointer.Brush.Color = clAqua
|
||||||
end
|
end
|
||||||
end
|
end
|
||||||
object pnSpline: TPanel
|
object pnSpline: TPanel
|
||||||
|
Loading…
Reference in New Issue
Block a user