From c3c3bd347112393a0de03a7efeb8bae127a619bf Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Micha=C3=ABl=20Van=20Canneyt?= <michael@freepascal.org>
Date: Wed, 8 Mar 2023 10:09:58 +0100
Subject: [PATCH] * Fix windows compilation

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

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