关于磁盘驱动器的两个问题。谢谢

Question

【问题一】例如，我的c盘盘符是WinXp(C:)，用什么函数可以把WinXp这段字符提取出来。
【问题二】GetDriveType函数中的返回值有一个是DRIVE_REMOVABLE，但是怎么判断当前驱动器是软驱还是移动硬盘还是优盘？

Answer 1

var
  LableBuffer, lpFileSystemNameBuffer: Array[0..255] of Char;
  lpVolumeSerialNumber, lpMaximumComponentLength, lpFileSystemFlags: DWORD;
begin
  GetVolumeInformation('c:\', LableBuffer, SizeOf(LableBuffer),
    @lpVolumeSerialNumber, lpMaximumComponentLength, lpFileSystemFlags, lpFileSystemNameBuffer,
    SizeOf(lpFileSystemNameBuffer));
  Showmessage(LableBuffer);
end;————————————————————————————————————
宠辱不惊，看庭前花开花落，去留无意；毁誉由人，望天上云卷云舒，聚散任风。
————————————————————————————————————

Answer 2

用API的DeviceIOControl了
看MSDN去了，计较复杂的