diff --git a/rtl/objpas/classes/classes.inc b/rtl/objpas/classes/classes.inc
index da66c3846c..255eda7f64 100644
--- a/rtl/objpas/classes/classes.inc
+++ b/rtl/objpas/classes/classes.inc
@@ -1413,7 +1413,7 @@ function CreateComponentfromRes(const res : string;Inst : THandle;var Component
 
     if Inst=0 then
       Inst:=HInstance;
-    ResId:=FindResource(Inst, Res, RT_RCDATA);
+    ResId:=System.FindResource(Inst, Res, RT_RCDATA);
     result:=ResID<>0;
     try
       if Result then