From 51333d23ff128349ec3854db6124b3338230193f Mon Sep 17 00:00:00 2001
From: ask <ask@lazarus-ide.org>
Date: Mon, 4 Oct 2010 09:15:08 +0000
Subject: [PATCH] TAChart: Fix skipping obsolete property

git-svn-id: trunk@27560 -
---
 components/tachart/talegend.pas | 15 +++++++++------
 1 file changed, 9 insertions(+), 6 deletions(-)

diff --git a/components/tachart/talegend.pas b/components/tachart/talegend.pas
index a1f8414f68..92635a72f6 100644
--- a/components/tachart/talegend.pas
+++ b/components/tachart/talegend.pas
@@ -463,12 +463,6 @@ begin
   StyleChanged(Self);
 end;
 
-procedure SkipObsoleteProperties;
-begin
-  RegisterPropertyEditor(
-    TypeInfo(TChartDistance), TChartLegend, 'Margin', THiddenPropertyEditor);
-end;
-
 { TChartSeriesLegend }
 
 procedure TChartSeriesLegend.Assign(Source: TPersistent);
@@ -503,5 +497,14 @@ begin
   StyleChanged(Self);
 end;
 
+procedure SkipObsoleteProperties;
+begin
+  RegisterPropertyEditor(
+    TypeInfo(TChartDistance), TChartLegend, 'Margin', THiddenPropertyEditor);
+end;
+
+initialization
+  SkipObsoleteProperties;
+
 end.