From 148f7ce9be35f58b02742e92504b88ffb27b4df6 Mon Sep 17 00:00:00 2001
From: ask <ask@lazarus-ide.org>
Date: Thu, 21 May 2009 08:42:25 +0000
Subject: [PATCH] TAChart: Fix for r20095 #453a046de9.

git-svn-id: trunk@20096 -
---
 components/tachart/tagraph.pas | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/components/tachart/tagraph.pas b/components/tachart/tagraph.pas
index 7dc83a015b..cc7e098eee 100644
--- a/components/tachart/tagraph.pas
+++ b/components/tachart/tagraph.pas
@@ -1309,8 +1309,8 @@ procedure TChart.UpdateExtent;
         if ALo > AHi then Exchange(ALo, AHi);
         // Expand view slightly to avoid puttind data points on the chart edge.
         ext := ExpandPercentage * PERCENT * Max(AHi - ALo, 1);
-        SetLo(ALo - ext);
-        SetHi(AHi + ext);
+        ALo -= ext;
+        AHi += ext;
       end;
       1: AHi := ALo + DEFAULT_WIDTH;
       2: ALo := AHi - DEFAULT_WIDTH;