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

TAChart: Use Arrow.BaseLength property in func demo

Browse Source 
git-svn-id: trunk@35629 -
This commit is contained in:
ask 2012-03-01 10:17:22 +00:00
parent 81a9bd490d
commit 087cd23d05
1 changed files with 6 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
components/tachart/demo/func/main.lfm
View File

@ -71,12 +71,18 @@ object Form1: TForm1
end end
object Chart1XAxis: TConstantLine object Chart1XAxis: TConstantLine
Legend.Visible = False Legend.Visible = False
Arrow.BaseLength = 5
Arrow.Length = 12
Arrow.Visible = True Arrow.Visible = True
Arrow.Width = 4
Position = 0 Position = 0
end end
object Chart1YAxis: TConstantLine object Chart1YAxis: TConstantLine
Legend.Visible = False Legend.Visible = False
Arrow.BaseLength = 5
Arrow.Length = 12
Arrow.Visible = True Arrow.Visible = True
Arrow.Width = 4
LineStyle = lsVertical LineStyle = lsVertical
Position = 0 Position = 0
end end