Vichingo455-RePacks
/
xtool
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases 1 Wiki Activity

0.7.9 hotfix 1

This commit is contained in:
Razor12911 2023-09-18 02:42:01 +02:00 committed by GitHub
parent 83e41efb88
commit 16199e4908
No known key found for this signature in database
GPG Key ID: 4AEE18F83AFDEB23
1 changed files with 8 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

11
imports/OodleDLL.pas
View File

@ -10,6 +10,11 @@ uses
const const
OODLELZ_SCRATCH_MEM_NO_BOUND = NativeUInt(-1); OODLELZ_SCRATCH_MEM_NO_BOUND = NativeUInt(-1);
{$IFDEF CPU64BITS}
OODLELZ_ARCH = '_win64.dll';
{$ELSE}
OODLELZ_ARCH = '_win32.dll';
{$ENDIF}
type type
POodleLZ_CompressOptions = ^TOodleLZ_CompressOptions; POodleLZ_CompressOptions = ^TOodleLZ_CompressOptions;
@ -95,7 +100,7 @@ begin
for I := 3 to 9 do for I := 3 to 9 do
begin begin
Lib.LoadLib(ExpandPath(PluginsPath + 'oo2core_' + I.ToString + Lib.LoadLib(ExpandPath(PluginsPath + 'oo2core_' + I.ToString +
'_win64.dll', True)); OODLELZ_ARCH, True));
if Lib.Loaded then if Lib.Loaded then
break; break;
end; end;
@ -103,7 +108,7 @@ begin
for I := 3 to 9 do for I := 3 to 9 do
begin begin
Lib.LoadLib(ExpandPath(PluginsPath + 'oo2ext_' + I.ToString + Lib.LoadLib(ExpandPath(PluginsPath + 'oo2ext_' + I.ToString +
'_win64.dll', True)); OODLELZ_ARCH, True));
if Lib.Loaded then if Lib.Loaded then
break; break;
end; end;
@ -230,7 +235,7 @@ var
initialization initialization
DLLFile := PluginsPath + 'oo2core_9_win64.dll'; DLLFile := PluginsPath + 'oo2core_9' + OODLELZ_ARCH;
for I := 1 to ParamCount do for I := 1 to ParamCount do
begin begin
if ParamStr(I).StartsWith(DLLParam) then if ParamStr(I).StartsWith(DLLParam) then