Trouver le répertoire temporaire de Windows avec les API

uses Windows;

function GetWindowsTempDir : string;
var
PPath : array[0..255] of char;
begin
GetTempPath (SizeOf (PPath), PPath);
result := strpas(PPath);
end;