delphi获取操作系统安装磁盘盘符

本文整理自网络，侵删。

 
//获取操作系统安装磁盘盘符 delphitop.com
function GetSysDisk: String;
var
s: PChar;
begin
GetMem(s,255);
GetSystemDirectory(s,255);
Result := Copy(s,1,1)+':\';
FreeMem(s);
end;
 

相关阅读 >>

github上通过星级评估排名前10的最受欢迎的开源Delphi项目

Delphi打印timage图片

Delphi 验证ip地址

Delphi xe 的 tdictionary

Delphi 解析json生成json

Delphi监控文件夹

Delphi的一些开发技巧和方法

几个webbrowser相关的函数

Delphi 获取网页源代码的最简单办法

Delphi在文件结尾写入和读出数据

更多相关阅读请进入《Delphi》频道 >>

转载请注明出处：木庄网络博客 » delphi获取操作系统安装磁盘盘符