var tmp:string; begin tmp := GetEnvironmentVariable('TEMP'); . . . end;