Explorar o código

use App Temp Path replace System Temp Path

MaiXinRong %!s(int64=8) %!d(string=hai) anos
pai
achega
4f28f2dbde
Modificáronse 1 ficheiros con 2 adicións e 1 borrados
  1. 2 1
      Units/UtilMethods.pas

+ 2 - 1
Units/UtilMethods.pas

@@ -857,7 +857,8 @@ end;
 
 function GetTempFilePath: string;
 begin
-  Result := GetTempFileDir + '\';
+  //Result := GetTempFileDir + '\';
+  Result := GetAppTempPath;
 end;
 
 function GetTempName(ALength: Integer): string;