TAChart: Fix drawing of out-of-extent function series with +Infinity in domain exclusions.

git-svn-id: trunk@38863 -
This commit is contained in:
ask 2012-09-27 14:38:38 +00:00
parent 681289e730
commit adf12d0ef5

View File

@ -622,7 +622,8 @@ begin
if FDomainExclusions.Intersect(xa, xa, hint) then
AXg := FAxisToGraphXr(xa);
AOnMoveTo(AXg, xa);
if AXg < AXMax then
AOnMoveTo(AXg, xa);
while AXg < AXMax do begin
xg1 := AXg + FGraphStep;