delphi getSys32Path()得到系统System32路径
{得到系统C:\Windows\system32 路径}
//调用 Edit1.text:=getSys32Path();
function getSys32Path():string;
var
sPath : PCHAR ;
begin
GetMem(sPath,255);
GetSystemDirectory(sPath,255);
Result := sPath;//C:\Windows\system32
end;
推荐分享
图文皆来源于网络，内容仅做公益性分享，版权归原作者所有，如有侵权请告知删除！
Copyright © 2014 DelphiW.com 开发 源码 文档 技巧 All Rights Reserved
晋ICP备14006235号-8 晋公网安备 14108102000087号
执行时间: 0.036736011505127 seconds