关于U盘的一些问题？高手进来！

Question

请问用程序如何找到U盘所在的盘符？？？？

Answer 1

var Driver:char;
begin
 for Driver:='C' to 'Z' do
   if GetDriveType(PansiChar(Driver+':\'))=DRIVE_REMOVABLE then
        ShowMessage(Driver+' 是U盘');end;

Answer 2

c:不要放在循环里...
应该是 for Driver:='D' to 'Z' do....

Answer 3

这个都是可以的,一般遍历盘符,是从A盘到Z盘。我没从A开始，是因为AB盘默认是软盘的盘符，而软盘也属于DRIVE_REMOVABLE类型，会混淆。实际上也很少电脑的盘符会到达Z盘。^_^