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

TAChart: Do not store redundant SeriesColor property

Browse Source 
git-svn-id: trunk@27133 -
This commit is contained in:
ask 2010-08-18 06:39:59 +00:00
parent e44c18a3d3
commit 8592caeac1
1 changed files with 3 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
components/tachart/taseries.pas
View File

@ -72,7 +72,7 @@ type
read FBarWidthPercent write SetBarWidthPercent default DEF_BAR_WIDTH_PERCENT;
property Depth;
property SeriesColor: TColor
read GetSeriesColor write SetSeriesColor default clTAColor;
read GetSeriesColor write SetSeriesColor stored false default clRed;
property Source;
property UseReticule;
property ZeroLevel: Double
@ -139,7 +139,7 @@ type
read FConnectType write SetConnectType default ctLine;
property Depth;
property SeriesColor: TColor
read GetSeriesColor write SetSeriesColor default clWhite;
read GetSeriesColor write SetSeriesColor stored false default clWhite;
property Source;
property UseReticule;
property UseZeroLevel: Boolean
@ -195,7 +195,7 @@ type
read FOnDrawPointer write FOnDrawPointer;
property Pointer: TSeriesPointer read FPointer write SetPointer;
property SeriesColor: TColor
read GetSeriesColor write SetSeriesColor default clTAColor;
read GetSeriesColor write SetSeriesColor stored false default clBlack;
property ShowLines: Boolean
read GetShowLines write SetShowLines stored false default true;
property ShowPoints: Boolean