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

TAChart: Hide pointer of TPolarSeries by default (previous behavior).

Browse Source 
git-svn-id: trunk@54330 -
This commit is contained in:
wp 2017-03-03 10:31:20 +00:00
parent 0899cfc7a4
commit ccd8c6cb32
1 changed files with 3 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
components/tachart/taradialseries.pas
View File

@ -153,7 +153,7 @@ type
property OriginX: Double read FOriginX write SetOriginX stored IsOriginXStored;
property OriginY: Double read FOriginY write SetOriginY stored IsOriginYStored;
property Pointer;
property ShowPoints: Boolean read FShowPoints write SetShowPoints default false;
property ShowPoints: Boolean read FShowPoints write SetShowPoints; // default false;
property Source;
property OnCustomDrawPointer;
property OnGetPointerStyle;
@ -626,6 +626,8 @@ begin
FLinePen := TPen.Create;
FLinePen.OnChange := @StyleChanged;
FPointer := TSeriesPointer.Create(FChart);
FShowPoints := true; // needed for SetShowPoints to execute its code
SetShowPoints(false);
end;
destructor TPolarSeries.Destroy;