本文整理自网络,侵删。
function GetTempDirectory : String;
var
TempDir : array[0..255] of Char;
begin
GetTempPath(255, @TempDir);
Result := StrPas(TempDir);
end;
相关阅读 >>
Delphi 利用hook api函数openprocess与terminateprocess来防止任务管理器结束进程
Delphi gettempdirectory 获取临时文件夹路径
更多相关阅读请进入《Delphi》频道 >>