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

TAChart: Find point index error in relation with ColorEach of line series (https://forum.lazarus.freepascal.org/index.php/topic,56324.msg418533.html#msg418533).

Browse Source 
(cherry picked from commit 925e2e7370)
This commit is contained in:
wp_xyz 2021-09-17 21:28:48 +02:00
parent 94392c6abd
commit 0bc0484c52
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
components/tachart/taseries.pas
View File

@ -672,7 +672,7 @@ var
ADrawer.Pen := LinePen;
imgPt1 := ParentChart.GraphToImage(gp);
col1 := GetPtColor(i);
col1 := GetPtColor(i + FLoBound);
// First line for line type ltFromOrigin
if LineType = ltFromOrigin then begin
@ -693,7 +693,7 @@ var
hasBreak := false;
end;
imgPt2 := ParentChart.GraphToImage(gp);
col2 := GetPtColor(i);
col2 := GetPtColor(i + FLoBound);
if imgPt1 <> imgPt2 then begin
case FColorEach of
ceLineBefore, cePointAndLineBefore: col := col2;