RxVerInfo - fix compile on non Linux or Windows OS

git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@2891 8e941d3f-bd1b-0410-a28a-d453659cc2b4
This commit is contained in:
alexs75
2014-01-25 14:56:15 +00:00
parent 400bf62aba
commit bfd340e043

View File

@@ -109,13 +109,14 @@ type
implementation
uses FileUtil, resource, resreader, InterfaceBase, rxconst,
uses FileUtil, resource, resreader, InterfaceBase, rxconst
{$IFDEF WINDOWS}
winpeimagereader
, winpeimagereader
{$ENDIF}
{$IFDEF LINUX}
elfreader
, elfreader
{$ENDIF}
;
{ TRxVersionInfo }
@@ -263,12 +264,17 @@ var
begin
FValues.Clear;
FValid:=false;
Reader:=nil;
{$IFDEF WINDOWS}
Reader:=TWinPEImageResourceReader.Create;
{$ENDIF}
{$IFDEF LINUX}
Reader:=TElfResourceReader.Create;
{$ENDIF}
if Reader = nil then
exit;
Res:=TResources.Create;
V:=nil;
try