Узнать пути к временным папкам

[Koller]

надо узнать путь к временным папкам.

var
buf:string;
len:UINT;
begin
SetLength(buf, MAX_PATH+1);
len:=GetTempPath(MAX_PATH, PAnsiChar(buf));
SetLength(buf,len);
GetTempDir:=buf - получается пользовательский темп

потом делал через s:=GetEnvironmentVariable('temp'); и получается опять только пользовательский темп

Мне надо еще хотябы виндосовский темп и рабочий стол. Помогите плиз

[GunSmoker]

http://www.gunsmoker.ru/2011/09/blog-post_11.html - см. раздел "Системные папки".

Но временная папка стоит особняком. GetTempPath - это единственный способ её получить.

И, кстати, понятия "системная папка Temp" не существует (о чём чёрным по белому сказано в описании GetTempPath). Поэтому не очень понятно, что имеется в виду под "виндосовский темп".

[Aliens_wolfs]

function WinTemp: string;
begin
 SetLength(result, MAX_PATH);
 SetLength(result, GetTempPath(MAX_PATH, PChar(result)));
end;

procedure TForm1.Button1Click(Sender: TObject);
begin
showmessage(WinTemp);
end;

Остальную инфу по поводу папок Windows можешь посмотреть по этим ссылкам
http://www.programmersforum.ru/showthread.php?t=66828
http://www.programmersforum.ru/showthread.php?t=180791