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

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

Как узнать серийный номер СД диска?


ZiX ©   (2002-08-22 16:57:00) 

Как узнать серийный номер СД диска?
И как определить СД в дисководе или нет


_alx_   (2002-08-23 12:42:00) [1]

Spasibi za otveti
Esho vopros
Otkopal v kulibe.chm primer ispolzovaniya f-ii GEtVOlumeInformation, tak vot seriyniy nomer on vidayot no posle ispolzovaniya f-ii viletaet oshibka, i u nekotorih CD nomera vidavalis otricatelniye, takiye vashe bivayut????


easy   (2002-08-22 20:02:00) [2]


> И как определить СД в дисководе или нет

var CD:array[0..99] of char;
...
mcisendstring("Status cdaudio ready wait",CD,99,0);
if CD="true" then
begin
...


Pumpkin   (2002-08-22 18:40:00) [3]

2_alx_
>как это попробовать что то прочитать????
Наличие корневого каталога. напр GetFileAttributes("X:\",...)


_alx_   (2002-08-22 17:43:00) [4]

как это попробовать что то прочитать???? Допустим я ваще не знаю что на диске находится...


watcher   (2002-08-22 17:00:00) [5]

> Как узнать серийный номер СД диска?

GetVolumeInformation()

> И как определить СД в дисководе или нет

попробовать что-то прочитать


Наверх

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