Parcourir la source

* Fix wrong typecast

Michaël Van Canneyt il y a 1 an
Parent
commit
b9ef7416f0
1 fichiers modifiés avec 1 ajouts et 1 suppressions
  1. 1 1
      rtl/objpas/classes/reader.inc

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

@@ -1945,7 +1945,7 @@ begin
      end;
   if ResHandle=NilHandle then 
     exit;     
-  S:=TResourceStream.Create(NilHandle,DeltaName, PChar(RT_RCDATA));
+  S:=TResourceStream.Create(NilHandle,DeltaName, PAnsiChar(RT_RCDATA));
   try
     Proc(S);
   finally