diff --git a/components/tachart/tafuncseries.pas b/components/tachart/tafuncseries.pas
index 43ba96896b..530b99c567 100644
--- a/components/tachart/tafuncseries.pas
+++ b/components/tachart/tafuncseries.pas
@@ -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;