Скачать: CL | DM;

Открыть/Закрыть CD-RW из Delphi   Найти похожие ветки 

← →
Ufo_Log   (2002-03-23 15:04) [0]

Подскажите, plz, как из Delphi открыть/закрыть CD-RW дисковод.

---

← →
VID ©   (2002-03-23 20:57) [1]

uses mmsystem;

....


Procedure TForm1.OPENcd;
begin
mciSendString("Set cdaudio door open wait", nil, 0, handle);
end;

Procedure TForm1.Closecd;
begin
mciSendString("Set cdaudio door closed wait", nil, 0, handle);
end;

---

← →
Ufo_Log   (2002-03-23 22:10) [2]

2 VID:
Спасибо за ответ, но эти функции открывают и закрывают CD-ROM, а мне нужны функции для открытия и закрытия CD-RW дисковода..

---

← →
VID ©   (2002-03-23 22:16) [3]

ну не знаю, наверное для DVD тоже особенные функции есть :)))

---

← →
Ufo_Log   (2002-03-24 10:39) [4]

Я пробовал через mmsystem указывать DeviceType dtOther, а потом обращаться к дисководу по его букве (F:), но тогда выскакивает ошибка, как будто я указал неверное имя файла и пытаюсь открыть MPlayer...

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.013 c