Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2007.07.29;
Скачать: CL | DM;

Вниз

ID IDE   Найти похожие ветки 

 
Romm ©   (2007-07-01 18:35) [0]

Здравствуйте Мастера!

Скажите пожалуйста как програмно определить ID винчестера.

Спасибо.


 
GLXV   (2007-07-01 18:56) [1]

Способа (надёжного) нет:
GetVolumeInformation("J:\",VolumeName,MAX_PATH,@VolumeSerialNo,
MaxComponentLength,FileSystemFlags, FileSystemName,MAX_PATH);

после форматирования меняется.
Вот посмотри (сам искал):
http://sql.ru/forum/actualthread.aspx?tid=440648


 
Romm ©   (2007-07-01 19:05) [2]


> "J:\"


эта функция определяет ID раздела диска???
Если да, то мне нужно немного не то..
А именно меня интересует серийный номер(или как его обозвать) жесткого диска.

Суть в том, чтобы программа при первом запуске проверят ID винта и хранит его далеко далеко) При повторных запусках программа проверяет соответствие нынешнего ID с тем, что был получен при первом запуске.
Вот.


 
GLXV   (2007-07-01 19:16) [3]

> Romm ©   (01.07.07 19:05) [2]

по ссылке перейди!


 
Romm ©   (2007-07-01 19:21) [4]


> GLXV   (01.07.07 19:16) [3]

не особо помогло :(


 
GLXV   (2007-07-01 19:27) [5]

> не особо помогло :(

Так я о том же!

Там несколько примеров решения данного вопроса:
1) код oaken-а,
2) Кроик Семён дал ссылочку на компоненты (+ Help)
3) и в предпоследнем сообщении ссылка на демку Setup & Config Manager API

но не утруждай себя! я всёперепробовал:
- с Flash-ками всё Ok, а вот внешние винты...
- Windows XP или 2000- имеет значение

остановился на метке тома (его хоть после форматирования вернуть можно!)


 
Германн ©   (2007-07-02 00:16) [6]


> Romm ©   (01.07.07 18:35)
>
>

Смотри тут: http://home.earthlink.net/~akonshin/delphi_ru.htm


 
Romm ©   (2007-07-02 10:58) [7]

Спасибо, щас попробую



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

Текущий архив: 2007.07.29;
Скачать: CL | DM;

Наверх




Память: 0.48 MB
Время: 0.059 c
2-1183459889
zapis
2007-07-03 14:51
2007.07.29
Добавление записей в БД


2-1183639600
tytus
2007-07-05 16:46
2007.07.29
Трехзвенка. Как отключить клиента?


4-1171551012
dzuev
2007-02-15 17:50
2007.07.29
дурацкий вопрос - как возможно подключится к usb принтеру datamax


1-1179828671
DelphiLexx
2007-05-22 14:11
2007.07.29
Screen.Cursor не меняет вид курсора


2-1183596441
Abcdef123
2007-07-05 04:47
2007.07.29
Delphi перестала открывать проекты, почему?