существует у Flash-ки и ZIV-а какой-нибудь "ID"?

← →
Doom-2 (2007-05-04 10:57) [0]

На предприятии сотрудникам выдают Flash-ки и ZIV-ы одного производителя.
Как можно с помощью Delphi идентифицировать конкретное устройство? Вообще это возможно? (существует у этих устройст какой-нибудь "ID"?)

Чтобы в дальнейшем автоматизировать работу! Типа:
Flash(Смирнова) --> копирует всё из C:\Docs\Смирнов\
Flash(Иванова) --> копирует всё из C:\Docs\Иванов\
Flash(no name) --> обзор каталогов...

← →
Novice (2007-05-04 11:39) [1]

var
VolumeName,
FileSystemName : array [0..MAX_PATH-1] of Char;
VolumeSerialNo : DWord;
MaxComponentLength,FileSystemFlags: Cardinal;
begin
GetVolumeInformation("J:\",VolumeName,MAX_PATH,@VolumeSerialNo,
MaxComponentLength,FileSystemFlags, FileSystemName,MAX_PATH);
Memo1.Lines.Add("VolumeName = "+VolumeName);
Memo1.Lines.Add("SerialNo = $"+IntToHex(VolumeSerialNo,8));
Memo1.Lines.Add("CompLen = "+IntToStr(MaxComponentLength));
Memo1.Lines.Add("Flags = $"+IntToHex(FileSystemFlags,4));
Memo1.Lines.Add("FSName = "+FileSystemName);

← →
Doom-2 (2007-05-04 12:29) [2]

Супер!
Класс!
Превосходно!

Спасибо!!!!!!!!!!!!!!!!!

Стыдно спросить, но:
"SerialNo = $"+IntToHex(VolumeSerialNo,8));
после форматирования изменится?

← →
Doom-2 (2007-05-04 12:43) [3]

И, может, ещё на такой вопрос ответите:
Как отследить подключение новой Flash-ки или ZIV-а? и узнать соответственно "букву"?

> после форматирования изменится?
Скорее всего да. А что, часто форматируешь флэшки?

> и узнать соответственно "букву"?
Буквы может и не быть, потому как винда может автоматом подсунуть уже занятую другим девайсом букву.

← →
Doom-2 (2007-05-04 14:00) [5]

> А что, часто форматируешь флэшки?
Нет, искал надёжный способ "закрепить" конкретное устройство за конкретным пользователем.

Наклейки содрать можно, теперь вот оказалось, что остальное можно удалить форматированием! :-(

существует у Flash-ки и ZIV-а какой-нибудь "ID"? Найти похожие ветки