delphi 取系统临时路径
{****************************************************************
* 过程名称: GetTempDirectory
* 功能描述: 取系统临时路径
* 参数说明: 无
* 返 回 值: string 路径
* 历史记录: 2013.1.28 created by xzj
*****************************************************************}
function GetTempDirectory: string;
var
TempDir: array[0..255] of Char;
begin
GetTempPath(255, @TempDir);
Result := StrPas(TempDir);
end;
推荐分享
图文皆来源于网络，内容仅做公益性分享，版权归原作者所有，如有侵权请告知删除！
Copyright © 2014 DelphiW.com 开发 源码 文档 技巧 All Rights Reserved
晋ICP备14006235号-8 晋公网安备 14108102000087号
执行时间: 0.053828954696655 seconds