diff options
Diffstat (limited to 'packages/fcl-base/src/fileinfo.pp')
| -rw-r--r-- | packages/fcl-base/src/fileinfo.pp | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/packages/fcl-base/src/fileinfo.pp b/packages/fcl-base/src/fileinfo.pp index 7945fb3332..72edca1ee6 100644 --- a/packages/fcl-base/src/fileinfo.pp +++ b/packages/fcl-base/src/fileinfo.pp @@ -202,7 +202,7 @@ var Stream: TResourceStream; begin FreeResources; - Stream := TResourceStream.CreateFromID(Instance, 1, PChar(RT_VERSION)); + Stream := TResourceStream.CreateFromID(Instance, 1, {$ifdef UNICODE}PWideChar{$else}PChar{$endif}(RT_VERSION)); try FVersionInfo:=TVersionResource.Create; FVersionInfo.SetCustomRawDataStream(Stream); |