paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-08-17 17:49:13 +02:00
Code Issues Packages Projects Releases Wiki Activity

* Fix wrong typecast

Browse Source
This commit is contained in:
Michaël Van Canneyt 2023-11-08 14:17:55 +01:00
parent 0534810703
commit b9ef7416f0
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
rtl/objpas/classes/reader.inc
View File

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