Delphi 的一些函数（Windows相关）
时间：2011-06-16 来源：九月的海
// 获取Windows目录
function GetWindowsPath: String;
var
S:PChar;
begin
GetMem(S, MAX_PATH);
GetWindowsDirectory(S,MAX_PATH);
Result := S;
FreeMem(S);
end;
相关阅读 更多 +
排行榜 更多 +
时间：2011-06-16 来源：九月的海
// 获取Windows目录
function GetWindowsPath: String;
var
S:PChar;
begin
GetMem(S, MAX_PATH);
GetWindowsDirectory(S,MAX_PATH);
Result := S;
FreeMem(S);
end;
