Как определить в какой CD-rom вставлен диск, если сидюк не 1

← →
Гость (2004-10-03 19:42) [0]

Эта процедура отлавливае событие вставки сидирома, а как узнать букву сидука, в который встален диск.
procedure ReceiveMessage (var Msg: TMessage); message M_DEVICECHANGE; ......... ......... procedure TForm1.ReceiveMessage(var Msg: TMessage); begin if Msg.WParam=32772 then ShowMessage("CD-ROM Open"); if Msg.WParam=32768 then ShowMessage("CD-ROM Close"); end;

← →
GuAV © (2004-10-03 19:59) [1]

32768 это DBT_DEVICEARRIVAL = $8000; // system detected a new device
32772 это DBT_DEVICEREMOVECOMPLETE = $8004; // device is gone

Смотри DBT_DEVICEARRIVAL в MSDN - там есть пример как раз того что нужно.

hint - лучше так и писать:
const DBT_DEVICEARRIVAL = $8000; ... case wParam of DBT_DEVICEARRIVAL: ... ...
а 32768 и 32772 - не сразу понятно что значат

← →
GuAV © (2004-10-03 20:01) [2]

← →
GuAV © (2004-10-03 20:02) [3]

← →
Гость (2004-10-03 20:13) [4]

а 32768 и 32772 - не сразу понятно что значат
У меня просто был пример такой, я и сам не знал что это.
А ответ я уже нашел

http://delphimaster.net/view/4-1091205205/
http://delphimaster.net/view/4-1091205205/

Как определить в какой CD-rom вставлен диск, если сидюк не 1 Найти похожие ветки