From 06bc03d2d6faf0bb22bddbf0b8cae27872fba24d Mon Sep 17 00:00:00 2001
From: mattias <nc-gaertnma@netcologne.de>
Date: Fri, 23 Jul 2004 22:14:22 +0000
Subject: [PATCH] fixed compilation for fpc 1.0.10

git-svn-id: trunk@5700 -
---
 components/interbase/README | 3 +++
 lcl/controls.pp             | 5 ++++-
 2 files changed, 7 insertions(+), 1 deletion(-)

diff --git a/components/interbase/README b/components/interbase/README
index 0f00b570ae..868ebb00a1 100644
--- a/components/interbase/README
+++ b/components/interbase/README
@@ -9,4 +9,7 @@ You need to install
   For example:
   ln -s /usr/local/firebird/lib/libfbclient.so /usr/lib/libgds.so
   
+
+Links:
+  http://www.progdigy.com/
   
diff --git a/lcl/controls.pp b/lcl/controls.pp
index 4188c8bdbb..d01d9234d1 100644
--- a/lcl/controls.pp
+++ b/lcl/controls.pp
@@ -1454,7 +1454,6 @@ type
     procedure ParentFormInitializeWnd; virtual; //gets called by InitializeWnd of parent form
     procedure ReAlign; // realign all childs
     procedure RealSetText(const Value: TCaption); override;
-    procedure ReCreateWnd;
     procedure RemoveFocus(Removing: Boolean);
     procedure SendMoveSizeMessages(SizeChanged, PosChanged: boolean); override;
     procedure SetBorderStyle(NewStyle: TBorderStyle); virtual;
@@ -1536,6 +1535,7 @@ type
     Procedure Insert(AControl: TControl);
     Procedure Insert(AControl: TControl; Index: integer);
     Procedure Remove(AControl: TControl);
+    procedure ReCreateWnd;
     procedure SetBounds(aLeft, aTop, aWidth, aHeight: integer); override;
     procedure Hide;
     procedure Repaint; override;
@@ -2346,6 +2346,9 @@ end.
 { =============================================================================
 
   $Log$
+  Revision 1.227  2004/07/23 22:14:22  mattias
+  fixed compilation for fpc 1.0.10
+
   Revision 1.226  2004/07/14 15:57:53  mattias
   fixed 1.0.10 compilation  from Vincent