diff --git a/packages/rtl/classes.pas b/packages/rtl/classes.pas
index 012e4d8..91098eb 100644
--- a/packages/rtl/classes.pas
+++ b/packages/rtl/classes.pas
@@ -9964,9 +9964,7 @@ begin
 end;
 
 function InitInheritedComponent(Instance: TComponent; RootAncestor: TClass): Boolean;
-Var
-  I: Integer;
-
+var
   Handler: TInitHandler;
 
   ComponentClass: TComponentClass;