Selaa lähdekoodia

Again: Don't treat a failed trust check on ISPP.dll the same as a missing ISPP.dll.

Martijn Laan 4 kuukautta sitten
vanhempi
commit
ec2e3e5b99
2 muutettua tiedostoa jossa 3 lisäystä ja 3 poistoa
  1. 1 1
      Projects/ISCC.dpr
  2. 2 2
      Projects/Src/IDE.HelperFunc.pas

+ 1 - 1
Projects/ISCC.dpr

@@ -651,7 +651,7 @@ end;
 
 function ISPPInstalled: Boolean;
 begin
-  Result := TrustedFileExists(PathExtractPath(NewParamStr(0)) + 'ISPP.dll');
+  Result := NewFileExists(PathExtractPath(NewParamStr(0)) + 'ISPP.dll');
 end;
 
 begin

+ 2 - 2
Projects/Src/IDE.HelperFunc.pas

@@ -85,7 +85,7 @@ implementation
 uses
   ActiveX, ShlObj, ShellApi, CommDlg, SysUtils, IOUtils, StrUtils,
   Messages, DwmApi, Consts,
-  TrustFunc, Shared.CommonFunc, Shared.CommonFunc.Vcl, PathFunc, Shared.FileClass, NewUxTheme,
+  Shared.CommonFunc, Shared.CommonFunc.Vcl, PathFunc, Shared.FileClass, NewUxTheme,
   IDE.MainForm, IDE.Messages, Shared.ConfigIniFile;
 
 procedure InitFormFont(Form: TForm);
@@ -233,7 +233,7 @@ end;
 
 function ISPPInstalled: Boolean;
 begin
-  Result := TrustedFileExists(PathExtractPath(NewParamStr(0)) + 'ISPP.dll');
+  Result := NewFileExists(PathExtractPath(NewParamStr(0)) + 'ISPP.dll');
 end;
 
 function IsISPPBuiltins(const Filename: String): Boolean;