Приветствую!
Странно, вроде
integer(LogDrives) := GetLogicalDrives;
for ii := 0 to 25 do
if (ii in LogDrives) then begin
s := chr(ii + 65) + ':\';
if GetDriveType(PChar(s))=DRIVE_REMOVABLE then
Begin ........
работало с флешкой, а с локальными дисками и внешним USB винчестером - точно нет!