var
vTmp:string;
vtmpPath:PChar;
begin
GetMem(vtmpPath,MAX_PATH); //分配空间,MAX_PATH是常量
GetTempPath(MAX_PATH,vtmpPath); //获取系统临时目录,写入变量
vTmp:=StrPas(vtmpPath); //将变量从PChar变成string型
FreeMem(vtmpPath); //释放空间
获取系统临时目录
最新推荐文章于 2023-04-26 15:56:57 发布