From dbfbadb3f21bbe20831b9510eb0627f6f09b3f0b Mon Sep 17 00:00:00 2001
From: michael <michael@freepascal.org>
Date: Thu, 5 Jul 2018 11:29:58 +0000
Subject: [PATCH] * Component class

---
 packages/rtl/classes.pas | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/packages/rtl/classes.pas b/packages/rtl/classes.pas
index 32eb4b6..26b0e14 100644
--- a/packages/rtl/classes.pas
+++ b/packages/rtl/classes.pas
@@ -588,7 +588,7 @@ type
     property Name: TComponentName read FName write SetName stored False;
     property Tag: PtrInt read FTag write FTag {default 0};
   end;
-
+  TComponentClass = Class of TComponent;
 
 Procedure RegisterClass(AClass : TPersistentClass);
 Function GetClass(AClassName : string) : TPersistentClass;