首页 > 代码库 > 获得临时文件目录(Temp文件夹)

获得临时文件目录(Temp文件夹)

C:\Users\ADMINI~1\AppData\Local\Temp\
 
//GetTempPath获得临时文件目录(Temp文件夹) 
function TempPath:String;
var
  tmp:array [0..MAX_PATH] of Char;
begin
  GetTempPath(MAX_PATH,tmp);
  Result:= tmp;
end;
 
procedure TForm1.Button1Click(Sender: TObject);
begin
  Edit1.Text := TempPath;
end;


来自为知笔记(Wiz)