TAChart: Fix infinite loop caused by r60403 #f5f55eaf16

git-svn-id: trunk@60407 -
This commit is contained in:
wp 2019-02-11 18:55:44 +00:00
parent 6921b150ee
commit 8f58e27315

View File

@ -1904,7 +1904,7 @@ begin
m[dir] := Max(m[dir], dist + scMarksDistance);
if (Source.YCount > 0) and (j = 0) then begin
if (Source.YCount > 1) and (j = 0) then begin
if FStacked then begin
ysum := 0;
for j := 0 to Source.YCount-1 do