From c9dfc381a45b4ab43e320e4830135e60ea961601 Mon Sep 17 00:00:00 2001
From: mattias <nc-gaertnma@netcologne.de>
Date: Fri, 27 Dec 2002 17:46:04 +0000
Subject: [PATCH] fixed SetColor

git-svn-id: trunk@3743 -
---
 lcl/forms.pp | 3 +--
 1 file changed, 1 insertion(+), 2 deletions(-)

diff --git a/lcl/forms.pp b/lcl/forms.pp
index 8c284754c8..7deb8a0d4f 100644
--- a/lcl/forms.pp
+++ b/lcl/forms.pp
@@ -368,7 +368,7 @@ type
     property AutoSize;
     property BorderStyle;
     property Caption;
-    property Color default clBtnFace;
+    property Color;
     property ClientHeight;
     property ClientWidth;
     property Constraints;
@@ -423,7 +423,6 @@ type
     destructor Destroy; override;
     procedure ActivateHint(ARect: TRect; const AHint: String); virtual;
     function CalcHintRect(MaxWidth: Integer; const AHint: String; AData: Pointer): TRect; virtual;
-    property Color;
     property AutoHide : Boolean read FAutoHide write SetAutoHide;
     property HideInterval : Integer read FHideInterval write SetHideInterval;
   end;