Jak w Delphi wykryć moment wysuwania i wsuwania CD-ROM'u ?
0
0
nie będę chyba bardzo pomocny ale mam pewien pomysł
za pomocą tego kodu można otworzyć lub zamknąc tackę CD-ROMU
uses MMSystem;
mciSendString('Set cdaudio door open wait',nil,0,handle); *wysuń
mciSendString('Set cdaudio door closed wait',nil,0,handle); *wsuń
być może jeśli spróbujemy otworzyć już otwartą tackę lub zamknąć zamkniętą to wyskoczy jakiś błąd który obsłużymy sobie po naszemu (np. try...except)
można np. za pomocą Timera sprawdzać tak co jakiś czas czy tacka jest zamknięta czy otwarta a jeśli stan tacki się zmieni wykryjemy ten moment :-)