Sfoglia il codice sorgente

* Fix windows compilation

Michaël Van Canneyt 2 anni fa
parent
commit
c3c3bd3471
1 ha cambiato i file con 1 aggiunte e 1 eliminazioni
  1. 1 1
      rtl/objpas/classes/classes.inc

+ 1 - 1
rtl/objpas/classes/classes.inc

@@ -1413,7 +1413,7 @@ function CreateComponentfromRes(const res : string;Inst : THandle;var Component
 
 
     if Inst=0 then
     if Inst=0 then
       Inst:=HInstance;
       Inst:=HInstance;
-    ResId:=FindResource(Inst, Res, RT_RCDATA);
+    ResId:=System.FindResource(Inst, Res, RT_RCDATA);
     result:=ResID<>0;
     result:=ResID<>0;
     try
     try
       if Result then
       if Result then