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

Идентификация дискетки   Найти похожие ветки 

 
Some1   (2003-03-30 08:38) [0]

В общем такая проблема: Пользователь копирует какие-нибудь
файлы на дискетку... как только происходит такое действие, мы
должны идентифицировать вставленную в дисковод дискетку. Но как
это можно сделать? По размеру доступного места - почти у всех
дискет он одинаковый, по метке тома - не катит...
Например каждый мобильный телефон можно идентифицировать по их
IMEI - 15-значному номеру. Но как быть с простой дискеткой?


 
Anatoly Podgoretsky ©   (2003-03-30 09:43) [1]

Почему не подходит серийный номер дискеты, он именно для этой цели предназначен, только не форматируй дискеты Norton Comander, он нарушает это требование, кроме серийного номера есть есть метка тома, задается как при форматировании, так и позже, командой LABEL.


 
Some1   (2003-03-30 14:30) [2]

To Anatoly Podgoretsky А как это можно считать на Дельфи???


 
Anatoly Podgoretsky ©   (2003-03-30 15:31) [3]

GetVolumeInformation


 
Some1   (2003-03-31 15:16) [4]

А как юзать-то???


 
Anatoly Podgoretsky ©   (2003-03-31 15:24) [5]

Some1 (31.03.03 15:16)
Так ты еще до сих пор справку не посмотрел, не сделал помиск по этому слову в местном и прочих FAQ?
Если посмотрел или нашел в FAQ, то что конкретно именно не понятно?
Будет конкретность и будет повод для разговора.


 
Some1   (2003-04-01 10:10) [6]

Я английский незнаю, поэтому в справке нефига не понятно! =(


 
Some1   (2003-04-03 11:45) [7]

Ну???


 
nikus ©   (2003-04-05 00:49) [8]

2 Some1
Десятки тысяч программистов пользуется сравкой, а ты не можешь. А английский надо бы учить. Пригодиться.

procedure TForm1.FormCreate(Sender: TObject);
var s, f, m : DWord;
begin
GetVolumeInformation("a:", nil, 0, @s, m, f, nil, 0);
Form1.Caption := IntToHex(s shr 16, 4) + "-" + IntToHex(s shl 16 shr 16, 4);
end;


2 Anatoly Podgoretsky
Для серьёзной программы GetVolumeInformation не подойдёт, т.к. серийный номер дискеты можно и изменить, если не ошибаюсь, функцией DeviceIoControl из модуля Windows, что наглядно демонстрирует утилита Volumeid на www.sysinternals.com



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

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



Память: 0.46 MB
Время: 0.014 c
1-26464
AndreyP
2003-05-29 13:27
2003.06.09
Как перебрать в цикле компоненты на форме?


14-26649
Kesha
2003-05-20 18:51
2003.06.09
Outlook Email Resolve


14-26651
МуМу
2003-05-21 12:13
2003.06.09
Как в DbGride привязать какие либо значения к полям грида.


14-26730
Vlad Oshin
2003-05-22 14:45
2003.06.09
Приезжали к нам вчера Чичерина с МумийТроллем - сложилось


3-26393
KIR
2003-05-21 15:32
2003.06.09
Есть ли в IB аналог SELECT TOP 5 * FROM MyTable




   Наверх