本文整理自网络,侵删。
function GetTempDirectory : String;
var
TempDir : array[0..255] of Char;
begin
GetTempPath(255, @TempDir);
Result := StrPas(TempDir);
end;
相关阅读 >>
Delphi 使用 {$include} 或 {$i} 指令管理和调用自定义函数
Delphi中使用ixmlhttprequest如何用post方式提交带参
更多相关阅读请进入《Delphi》频道 >>