怎样得到Windows系统的临时路径.

Question

a:array[0..144] of char;
getsystemdirectory(a,sizeof(a));
showmessage(strpas(a));

Answer 1

function GetSpecialFolderDir(const folderid:integer):string;
var
    pidl:pItemIDList;
    buffer:array [ 0..255 ] of char ;
begin
    //取指定的文件夹项目表
    SHGetSpecialFolderLocation( application.Handle , folderid, pidl);
    SHGetPathFromIDList(pidl, buffer);    //转换成文件系统的路径
    result:=strpas(buffer);
end;

Answer 2

getwindowsdirectory(a,sizeof(a));//windows目录
gettemppath(sizeof(a),a);       //系统临时目录
getcurrentdirectory(sizeof(a),a)//当前目录

Answer 3

\KEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Window NT\CurrentVersion\ 的 Sysroot键

Answer 4

有函数呀
getwindowsdirectory(a,sizeof(a));//windows目录
gettemppath(sizeof(a),a);       //系统临时目录