From e93779cdaaf5b89b1927b0b12ed67907a6038bab Mon Sep 17 00:00:00 2001
From: ask <ask@lazarus-ide.org>
Date: Sun, 24 May 2009 01:38:30 +0000
Subject: [PATCH] TAChart: Move clTAColor to TAChartUtils. Fix error message.

git-svn-id: trunk@20151 -
---
 components/tachart/tachartutils.pas | 1 +
 components/tachart/tagraph.pas      | 1 -
 components/tachart/taseries.pas     | 2 +-
 3 files changed, 2 insertions(+), 2 deletions(-)

diff --git a/components/tachart/tachartutils.pas b/components/tachart/tachartutils.pas
index 2dd9443779..92616487bb 100644
--- a/components/tachart/tachartutils.pas
+++ b/components/tachart/tachartutils.pas
@@ -36,6 +36,7 @@ const
   Colors: array [1..MaxColor] of TColor = (
     clRed, clGreen, clYellow, clBlue, clWhite, clGray, clFuchsia,
     clTeal, clNavy, clMaroon, clLime, clOlive, clPurple, clSilver, clAqua);
+  clTAColor = clScrollBar;
   CHART_COMPONENT_IDE_PAGE = 'Chart';
 
 type
diff --git a/components/tachart/tagraph.pas b/components/tachart/tagraph.pas
index 5c0aba67c8..c4b86c2df9 100644
--- a/components/tachart/tagraph.pas
+++ b/components/tachart/tagraph.pas
@@ -33,7 +33,6 @@ uses
   TAChartUtils, TATypes;
 
 const
-  clTAColor = clScrollBar;
   LEGEND_SPACING = 5;
 
 type
diff --git a/components/tachart/taseries.pas b/components/tachart/taseries.pas
index 87968d695b..5303097c8c 100644
--- a/components/tachart/taseries.pas
+++ b/components/tachart/taseries.pas
@@ -481,7 +481,7 @@ end;
 function TChartSeries.ListSource: TListChartSource;
 begin
   if not (Source is TListChartSource) then
-    raise EFixedSourceRequired.Create('Fixed chart source required');
+    raise EFixedSourceRequired.Create('Editable chart source required');
   Result := Source as TListChartSource;
 end;