Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

ID IDE


Romm ©   (2007-07-01 18:35:00) 

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

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

Спасибо.


Romm   (2007-07-02 10:58:00) [1]

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


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


> Romm ©   (01.07.07 18:35)
>
>

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


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

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

Так я о том же!

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

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

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


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


> GLXV   (01.07.07 19:16) [3]

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


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

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

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


Romm   (2007-07-01 19:05:00) [6]


> 'J:\'


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

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


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

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

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


Наверх

Титульная страница Поиск, карта сайта Написать письмо