From 42d44be9aa57946e4b4fc48d9f543c5ad581131a Mon Sep 17 00:00:00 2001
From: ask <ask@lazarus-ide.org>
Date: Tue, 17 Nov 2009 09:35:58 +0000
Subject: [PATCH] TAChart: Fix Footer text position. See issue #15029.

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

diff --git a/components/tachart/tagraph.pas b/components/tachart/tagraph.pas
index fa94739a52..18360bb02f 100644
--- a/components/tachart/tagraph.pas
+++ b/components/tachart/tagraph.pas
@@ -575,7 +575,7 @@ begin
         for i := Text.Count - 1 downto 0 do begin
           sz := AlignedTextPos(Alignment, Text[i]);
           FClipRect.Bottom -= sz.cy;
-          ACanvas.TextOut(sz.cy, FClipRect.Bottom, Text[i]);
+          ACanvas.TextOut(sz.cx, FClipRect.Bottom, Text[i]);
         end;
         FClipRect.Bottom -= 4;
       end;