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

Вниз

Как узнать серийный (заводской) номер компакт-диска или дискеты?   Найти похожие ветки 

 
Стас   (2003-03-09 17:00) [0]

Как узнать серийный (заводской) номер компакт-диска или дискеты?
Тот самый, что показывается после форматирования дискеты, посредством команды формат (DOS)


 
DenneD   (2003-03-09 21:51) [1]

GetVolumeInformation("A:\{Здесь пишеш диск}", nil, 0, @VolumeSerialNumber,
MaximumComponentLength, FileSystemFlags, nil, 0);
SerialNumber := IntToHex(HiWord(VolumeSerialNumber),4)+
"-"+IntToHex(LoWord(VolumeSerialNumber), 4);


 
Стас   (2003-03-09 23:25) [2]

выдает неверный номер дискеты -0 и не правильный номер винта, а о компашкеи говорить нечего!



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

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

Наверх




Память: 0.46 MB
Время: 0.013 c
3-64028
Сергей
2003-03-02 12:21
2003.03.20
Access без Office


6-64252
kingdom
2003-01-29 17:45
2003.03.20
Как добавить группу в группу?


3-63959
galexis
2003-02-27 13:17
2003.03.20
Как создать базу данных в коде


1-64054
Alfons
2003-03-03 23:32
2003.03.20
Как кнопкой сворачивать форму со св-вом bsNone в TaskBar


14-64351
Ник
2003-03-05 09:20
2003.03.20
Давно не обновлялся раздел Новости VCL!