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

TAChart: Move TSeriesPointerStyle from TAChartUtils to TATypes unit.

Browse Source 
git-svn-id: trunk@27464 -
This commit is contained in:
ask 2010-09-26 03:25:35 +00:00
parent e7e1f256d3
commit e52d954696
2 changed files with 5 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
components/tachart/tachartutils.pas
View File

@ -77,11 +77,6 @@ type
smsLabelPercentTotal, { Cars 12 % of 1234 }
smsXValue); { 21/6/1996 }
TSeriesPointerStyle = (
psNone, psRectangle, psCircle, psCross, psDiagCross, psStar,
psLowBracket, psHighBracket, psLeftBracket, psRightBracket, psDiamond,
psTriangle, psLeftTriangle, psRightTriangle);
TDoubleInterval = record
FStart, FEnd: Double;
end;

5
components/tachart/tatypes.pas
View File

@ -198,6 +198,11 @@ type
property Style default smsNone;
end;
TSeriesPointerStyle = (
psNone, psRectangle, psCircle, psCross, psDiagCross, psStar,
psLowBracket, psHighBracket, psLeftBracket, psRightBracket, psDiamond,
psTriangle, psLeftTriangle, psRightTriangle);
{ TSeriesPointer }
TSeriesPointer = class(TChartElement)