1
0
mirror of https://github.com/unrealircd/unrealircd.git synced 2026-06-28 10:36:38 +02:00

- Updated installer for msvcr70.dll

This commit is contained in:
Bram Matthys
2004-09-09 00:10:19 +00:00
parent f71bc9335e
commit 326f506cd9
2 changed files with 10 additions and 9 deletions
+1
View File
@@ -348,3 +348,4 @@
- Fixed a typo in the *nix Makefile reported by Troco (#0002059)
- Added french docs, translated by Kolibot & Babass.
- Changed some stuff to use the release version of MS libraries.
- Updated installer for msvcr70.dll
+9 -9
View File
@@ -5,7 +5,7 @@
; Uncomment the above line to package an SSL build
#define USE_ZIP
; Uncomment the above line to package with ZIP support
; #define USE_CURL
#define USE_CURL
; Uncomment the above line to package with libcurl support
@@ -92,7 +92,7 @@ external 'isxdl_Download@files:isxdl.dll stdcall';
function isxdl_SetOption(Option, Value: PChar): Integer;
external 'isxdl_SetOption@files:isxdl.dll stdcall';
const dbgurl = 'http://www.unrealircd.com/downloads/DbgHelp.Dll';
const crturl = 'http://www.unrealircd.com/downloads/msvcr70d.dll';
const crturl = 'http://www.unrealircd.com/downloads/msvcr70.dll';
var didDbgDl,didCrtDl: Boolean;
function NextButtonClick(CurPage: Integer): Boolean;
@@ -106,20 +106,20 @@ begin
if ((CurPage = wpReady)) then begin
dbghelp := ExpandConstant('{sys}\DbgHelp.Dll');
output := ExpandConstant('{app}\DbgHelp.Dll');
msvcrt := ExpandConstant('{sys}\msvcr70d.Dll');
msvcrt := ExpandConstant('{sys}\msvcr70.Dll');
GetVersionNumbersString(dbghelp,m);
if (NOT FileExists(msvcrt)) then begin
answer := MsgBox('Unreal requires the MS C Runtime 7.0 in order to run, do you wish to install it now?', mbConfirmation, MB_YESNO);
if answer = IDYES then begin
tmp := ExpandConstant('{tmp}\msvcr70d.Dll');
isxdl_SetOption('title', 'Downloading msvcr70d.dll');
tmp := ExpandConstant('{tmp}\msvcr70.Dll');
isxdl_SetOption('title', 'Downloading msvcr70.dll');
hWnd := StrToInt(ExpandConstant('{wizardhwnd}'));
if isxdl_Download(hWnd, crturl, tmp) = 0 then begin
MsgBox('Download and installation of msvcr70d.dll failed, the file must be manually installed. The file can be downloaded at http://www.unrealircd.com/downloads/mscvr70.dll', mbInformation, MB_OK);
MsgBox('Download and installation of msvcr70.dll failed, the file must be manually installed. The file can be downloaded at http://www.unrealircd.com/downloads/mscvr70.dll', mbInformation, MB_OK);
end else
didCrtDl := true;
end else
MsgBox('In order for Unreal to properly function, you must manually install msvcr70d.dll. The dll can be downloaded from http://www.unrealircd.com/downloads/msvcr70d.dll', mbInformation, MB_OK);
MsgBox('In order for Unreal to properly function, you must manually install msvcr70.dll. The dll can be downloaded from http://www.unrealircd.com/downloads/msvcr70.dll', mbInformation, MB_OK);
end;
if (NOT FileExists(output)) then begin
if (NOT FileExists(dbghelp)) then
@@ -153,8 +153,8 @@ begin
FileCopy(input, output, true);
end;
if (didCrtDl) then begin
input := ExpandConstant('{tmp}\msvcr70d.dll');
output := ExpandConstant('{sys}\msvcr70d.dll');
input := ExpandConstant('{tmp}\msvcr70.dll');
output := ExpandConstant('{sys}\msvcr70.dll');
FileCopy(input, output, true);
end;
end;