Delphi 获取电脑多少个硬盘，每个硬盘多少个分区

代码的主要作用是获取当前哪个硬盘 每个硬盘对应的分区 并获取分区ID 如：

我这里有段WMI的代码 但我的电脑获取失败，有个F盘是我存放一般文件的 获取失败了！
http://bbs.csdn.net/topics/391026306?page=1#post-399163774

看看是不是权限不足，或者分区没有识别

wmi对这些支持有限。最好是调研系统API来做。

windows 7下，也可以通过调用diskpart查询分区。