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

TAChart: Do not use series color for pointer drawing in TLineSeries.

Browse Source 
Fixes issue #18594

git-svn-id: trunk@29181 -
This commit is contained in:
ask 2011-01-24 07:03:30 +00:00
parent c490f39011
commit ac7217664b
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
components/tachart/taseries.pas
View File

@ -459,7 +459,7 @@ begin
p := FGraphPoints[i - FLoBound];
if not ParentChart.IsPointInViewPort(p) then continue;
ai := ParentChart.GraphToImage(p);
FPointer.Draw(ACanvas, ai, GetColor(i));
FPointer.Draw(ACanvas, ai, Source[i]^.Color);
if Assigned(FOnDrawPointer) then
FOnDrawPointer(Self, ACanvas, i, ai);
end;