Главная страница
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.022 c
7-64399
Hopkins
2002-12-14 12:28
2003.03.20
Как из Delphi вносить изменения в окнах апплетов ?


3-63941
ki11er
2003-03-03 16:44
2003.03.20
Одновременные запросы (BDE)...


1-64154
Leo_pr
2003-03-07 14:46
2003.03.20
Help


1-64173
Lucefer
2003-03-06 16:28
2003.03.20
События от мышки


7-64401
race1
2003-01-25 16:02
2003.03.20
keys