Вниз
Скачать: CL | DM;

существует у 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-а? и  узнать соответственно "букву"?


 
Desdechado ©   (2007-05-04 13:18) [4]

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

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


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

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

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



Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: -0.973 c
1-1174589370
Кто ответит на вопрос?:)
2007-03-22 21:49
2007.05.20
Управление Excel-ем


1-1174662834
Veon
2007-03-23 18:13
2007.05.20
потоки и визуальные компоненты


6-1163695742
p314
2006-11-16 19:49
2007.05.20
ssl


2-1178266462
SerMaxx
2007-05-04 12:14
2007.05.20
Как работать с графиками


2-1178025607
gloom
2007-05-01 17:20
2007.05.20
Как добавить прогу в автозагрузку




   Наверх