delphi GetTempDirectory 获取临时文件夹路径

本文整理自网络，侵删。

 
uses
  ShellApi, ShlObj,
  ComObj,
  ActiveX;

function GetTempDirectory: string;
var
  lpBuffer: array[0..MAX_PATH] of Char;
begin
  GetTempPath(MAX_PATH, @lpBuffer);
  Result := StrPas(lpBuffer);
end;



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

相关阅读 >>

ring3下清零结束进程的Delphi版本

Delphi 遍历某字段并插入到combobox

Delphi datasnap stream 传递大数据

Delphi 判断字符串是否为纯数字组合

Delphi中quotedstr介绍及使用

Delphi 保存图片到数据库

Delphi代码禁止窗体最大化

winapi 字符及字符串函数(5): ischaralpha - 是否是个字母

Delphi ini 文件操作记要: 使用 tmeminifile

关于如何发现Delphi程序的内存泄漏

更多相关阅读请进入《Delphi》频道 >>

转载请注明出处：木庄网络博客 » delphi GetTempDirectory 获取临时文件夹路径