From f69a675b05aba044d93ebc155df3ab88a65e3891 Mon Sep 17 00:00:00 2001
From: ask <ask@lazarus-ide.org>
Date: Sat, 15 Sep 2012 09:28:09 +0000
Subject: [PATCH] TAChart: Fix compiler hints in TAAnimatedSource unit

git-svn-id: trunk@38664 -
---
 components/tachart/taanimatedsource.pas | 4 ++++
 1 file changed, 4 insertions(+)

diff --git a/components/tachart/taanimatedsource.pas b/components/tachart/taanimatedsource.pas
index 1f0b85f53f..2e74ba3e18 100644
--- a/components/tachart/taanimatedsource.pas
+++ b/components/tachart/taanimatedsource.pas
@@ -92,6 +92,7 @@ uses
 
 procedure TCustomAnimatedChartSource.Changed(ASender: TObject);
 begin
+  Unused(ASender);
   Notify;
 end;
 
@@ -218,5 +219,8 @@ begin
     OnStop(Self);
 end;
 
+initialization
+  if ZeroValue = 0 then; // Workaround for an incorrect "unused unit" hint.
+
 end.