From 0bc15a664bbd31de78dec43d7c74b69e997e3190 Mon Sep 17 00:00:00 2001
From: wp <wp.no-reply@lazarus-ide-org>
Date: Fri, 3 Mar 2017 12:06:03 +0000
Subject: [PATCH] TAChart: Fix zerolevel being added to barseries values (see
 http://forum.lazarus.freepascal.org/index.php/topic,14419.msg239919.html#msg239919)

git-svn-id: trunk@54335 -
---
 components/tachart/taseries.pas | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/components/tachart/taseries.pas b/components/tachart/taseries.pas
index 7eff99c469..173c0366d4 100644
--- a/components/tachart/taseries.pas
+++ b/components/tachart/taseries.pas
@@ -1055,7 +1055,7 @@ begin
     BarOffsetWidth(p.X, pointIndex, ofs, w);
     p.X += ofs;
     heights[0] := ZeroLevel;
-    heights[1] := ZeroLevel + p.Y;
+    heights[1] := NumberOr(p.Y, ZeroLevel);
     for stackIndex := 1 to Source.YCount - 1 do begin
       y := Source[pointIndex]^.YList[stackIndex - 1];
       if not IsNan(y) then