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