如何获取缓存的目录？在不同的操作系统下，98及2K下！(0分)

由于98下的缓存目录是windows下的I.....（默认安装）而2K下的目录又不同，那如何不管任何情况都可获取缓存的目录呢？

我抬！

添加 USE ShlObj,
function GetWinDir(Path: Integer): string;
var
Pid: PItemIDList;
sPath: array[0..255] of char;
begin
try
SHGetSpecialFolderLocation(Application.Handle, Path, Pid);
if SHGetPathFromIDList(Pid, sPath) then
{如果文件夹不是系统的一部分就返回False}
result := StrPas(sPath);
except
ShowMessage('定位路径有误, 请再试!');
end;
end;

利用GetWindir(CSIDL_INTERNET_CACHE)即可得到缓存路径；
PID具体参数请参见ShlObj.PAS

哇，这个问题你不给分的？

不好意思，我要怎么样给你加分？？我是新手刚来，有很多东东不清楚！还望多多指教！
谢谢你的回复！