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

TAChart: Fix color map series accidentally broken in r39173 #e4d8203192

Browse Source 
git-svn-id: trunk@39178 -
This commit is contained in:
ask 2012-10-28 18:15:21 +00:00
parent 5cf2ee259a
commit c3bf972233
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/tafuncseries.pas
View File

@ -1393,7 +1393,7 @@ begin
ADrawer.BrushColor := ColorByValue(v);
ADrawer.Rectangle(
Max(pt.X, r.Left), Max(pt.Y, r.Top),
Min(next.X, r.Right + 1), Min(next.Y, r.Bottom + 1));
Min(next.X, r.Right) + 1, Min(next.Y, r.Bottom) + 1);
pt.X := next.X;
end;
pt.Y := next.Y;