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

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

Открытие-закрытие привода CD [D6, XP]


Иван ©   (2008-11-20 23:45:00) 

Подскажите, можно ли какой командой открыть и закрыть CD привод в программе при нажатии на кнопку? Спасибо.


KilkennyCat   (2008-11-23 19:55:00) [1]


> Игорь ©   (21.11.08 16:26)

Молодец, пристыдил нас.
Я просто обрыдался.


Denis__   (2008-11-22 15:16:00) [2]

А, нет, Rouse_ выложил перевод. Да вот только он не работал:)
Вот тут обсуждение, может кто-нибудь все-таки переведет!
http://forum.sources.ru/index.php?showtopic=225102&hl=opencd


Denis__   (2008-11-22 14:26:00) [3]

Кстати, проблема-то полностью до сих пор не решена! Так что вопрос имеет смысл, правда не в такой постановке:) Как узнать, открыт лоток СД-рома или закрыт? Полно всяких кривых вариантов, основанных на задержке выполнения команд, и есть 1 вариант, написанный на С++ кажется, который не получается перевести на делфи. Rouse_ как-то обещал, но видимо забыл:)


Игорь   (2008-11-21 16:26:00) [4]


> KilkennyCat
> Anatoly Podgoretsky
> Правильный$Вася


Класно поиздевались над человеком, присоединяюсь.

Интересно придет он в следующий раз на это форум за помощью?


tesseract   (2008-11-21 16:15:00) [5]


> Вот у щелевого получится, но только вытолкнуть и то может
> не у всех.


На Маках например приходиться кредиткой изголяться.


Правильный$Вася   (2008-11-21 15:42:00) [6]

вытолкнуть диск - может и да
но автору нужно "открыть и закрыть CD привод", а не диск (которого может и не быть)
видимо, речь идет о лотке


Anatoly Podgoretsky   (2008-11-21 14:57:00) [7]

> {RASkov}  (21.11.2008 13:02:08)  [8]

Как же я видел этот класс, крышечка с ручной защелкой, аналогично СД, когда открыть можно ручкой. Вот у щелевого получится, но только вытолкнуть и то может не у всех.


{RASkov}   (2008-11-21 13:02:00) [8]

> а уж щелевые приводы


> И с вертикальной заправкой

Ну вытолкнуть-то я думаю получится у кода выше :)


Anatoly Podgoretsky   (2008-11-21 12:53:00) [9]

> Правильный$Вася  (21.11.2008 12:24:06)  [6]

И с вертикальной заправкой


Правильный$Вася   (2008-11-21 12:24:00) [10]


> KilkennyCat ©   (21.11.08 01:02) [3]

а уж щелевые приводы - так просто в восторге


Vayrus   (2008-11-21 09:32:00) [11]


procedure TForm1.Button1Click(Sender: TObject);
begin
mciSendString('Set cdaudio door open wait', nil, 0, handle);
end;

procedure TForm1.Button2Click(Sender: TObject);
begin
mciSendString('Set cdaudio door closed wait', nil, 0, handle);
end;


Anatoly Podgoretsky   (2008-11-21 08:57:00) [12]

СД эджекторов уже столько написано, что уже не смешно.


KilkennyCat   (2008-11-21 01:02:00) [13]

Особенно хорошо получается у ноутбуков. Особенно закрыть.


{RASkov}   (2008-11-21 00:01:00) [14]

http://yandex.ru/yandsearch?clid=14585&text=Открытие-закрытиепривода CD


{RASkov}   (2008-11-20 23:59:00) [15]

можно


Наверх

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