Библиотека программиста

28.11.2024 - Открытие и закрытие привода CD-ROM

Есть ли Win32 API функция, позволяющая не только открыть НО И ЗАКРЫТЬ CD-ROM? Хотелось бы не тянуться ручками к РС, а нажать мышкой на кнопку. Компонентом TMediaPlayer пользоваться не хочу, тем более компакт он может только извлечь.



Для закрытия CD-ROM:

Код
mciSendString('Set cdaudio door open wait', nil, 0, handle);



Для открытия CD-ROM:

Код
mciSendString('Set cdaudio door closed wait', nil, 0, handle);



Не забудьте включить MMSystem в список используемых модулей (uses).
Опубликовано на сайте: http://www.coders-library.ru
Прямая ссылка: http://www.coders-library.ru/index.php?name=news&op=view&id=28