paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-09-22 14:19:14 +02:00
Code Issues Packages Projects Releases Wiki Activity

TAChart: Add mark arrows to "label" demo

Browse Source 
git-svn-id: trunk@38505 -
This commit is contained in:
ask 2012-09-03 16:57:17 +00:00
parent b5a1282d12
commit 458fb3cdc9
1 changed files with 11 additions and 7 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

18
components/tachart/demo/labels/Main.lfm
View File

@ -1,5 +1,5 @@
object Form1: TForm1
Left = 1326
Left = 1160
Height = 414
Top = 177
Width = 496
@ -60,6 +60,10 @@ object Form1: TForm1
Align = alClient
ParentColor = False
object Chart1BarSeries1: TBarSeries
Marks.Arrow.BaseLength = 3
Marks.Arrow.Length = 9
Marks.Arrow.Visible = True
Marks.Arrow.Width = 4
Marks.Format = '%1:.2f%%'
Marks.Style = smsPercent
BarBrush.Color = clRed
@ -156,17 +160,17 @@ object Form1: TForm1
end
object lblAxisAngle: TLabel
Left = 6
Height = 14
Height = 13
Top = 8
Width = 21
Width = 20
Caption = 'Axis'
ParentColor = False
end
object lblSeriesAngle: TLabel
Left = 98
Height = 14
Height = 13
Top = 8
Width = 30
Width = 29
Caption = 'Series'
ParentColor = False
end
@ -183,9 +187,9 @@ object Form1: TForm1
end
object lblTitleAngle: TLabel
Left = 202
Height = 14
Height = 13
Top = 8
Width = 21
Width = 20
Caption = 'Title'
ParentColor = False
end