Diese Funktion gibt das Temp-Verzeichnis zurück:
Delphi-Quellcode:
function TForm1.FGetTempDir: String;
var IntSize: Integer;
begin
IntSize := 255;
SetLength(Result, IntSize);
IntSize := GetTempPath(IntSize, pchar(Result));
SetLength(Result, IntSize);
end;