paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-08-15 23:39:24 +02:00
Code Issues Packages Projects Releases Wiki Activity

TAChart: Fix compilation of save demo

Browse Source 
git-svn-id: trunk@28911 -
This commit is contained in:
ask 2011-01-09 07:24:00 +00:00
parent 2b8862f949
commit ef0f99f876
2 changed files with 5 additions and 11 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

14
components/tachart/demo/save/main.lfm
View File

@ -7,7 +7,7 @@ object Form1: TForm1
ClientHeight = 300 ClientHeight = 300
ClientWidth = 421 ClientWidth = 421
OnCreate = FormCreate OnCreate = FormCreate
LCLVersion = '0.9.29' LCLVersion = '0.9.31'
object Chart1: TChart object Chart1: TChart
Left = 0 Left = 0
Height = 276 Height = 276
@ -15,15 +15,10 @@ object Form1: TForm1
Width = 421 Width = 421
AxisList = < AxisList = <
item item
Alignment = calLeft Title.LabelFont.Orientation = 900
Title.Font.Orientation = 900
Transformation.Offset = 0
Transformation.Scale = 1
end end
item item
Alignment = calBottom Alignment = calBottom
Transformation.Offset = 0
Transformation.Scale = 1
end> end>
Foot.Brush.Color = clBtnFace Foot.Brush.Color = clBtnFace
Foot.Font.Color = clBlue Foot.Font.Color = clBlue
@ -35,15 +30,14 @@ object Form1: TForm1
Align = alClient Align = alClient
ParentColor = False ParentColor = False
object Chart1BarSeries1: TBarSeries object Chart1BarSeries1: TBarSeries
Marks.Format = '%0:g' Marks.Format = '%0:.9g'
Marks.Style = smsValue Marks.Style = smsValue
BarBrush.Color = clOlive BarBrush.Color = clOlive
SeriesColor = clOlive
end end
object Chart1FuncSeries1: TFuncSeries object Chart1FuncSeries1: TFuncSeries
ZPosition = 1
Pen.Color = clRed Pen.Color = clRed
Pen.Width = 2 Pen.Width = 2
ZPosition = 1
end end
end end
object ToolBar1: TToolBar object ToolBar1: TToolBar

2
components/tachart/demo/save/main.pas
View File

@ -5,7 +5,7 @@ unit main;
interface interface
uses uses
SysUtils, Forms, Graphics, Dialogs, ComCtrls, TAGraph, TASeries; SysUtils, Forms, Graphics, Dialogs, ComCtrls, TAGraph, TASeries, TAFuncSeries;
type type