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

本文整理自网络，侵删。

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

相关阅读 >>

Delphi 判断端口是否被使用

Delphi多线程

Delphi 2010 unicode

Delphi获取操作系统已运行的所有窗口程序

Delphi 临时文件路径（支持安卓、ios）

Delphi路径分割符处理相关函数

Delphi tidhttp 超时设置无效的解决方法

Delphi编写涂鸦桌面的小程序

Delphi debug权限提升

Delphi winapi: getwindowtext - 获取窗口标题

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

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