Форум программистов
 
Регистрация на форуме тут, о проблемах пишите сюда - alarforum@yandex.ru, проверяйте папку спам! Обязательно пройдите активизацию e-mail, а тут можно восстановить пароль

Купить рекламу на форуме 15-35 тыс рублей в месяц

Вернуться   Форум программистов > Низкоуровневое программирование > Win Api
Регистрация

Восстановить пароль
Повторная активизация e-mail

Ответ
 
Опции темы Поиск в этой теме
Старый 15.07.2007, 21:46   #1
Kalewa-Uliss
Новичок
Джуниор
 
Регистрация: 15.07.2007
Сообщений: 2
По умолчанию Как открыть DVD-rom

У меня есть код который открывает СD-rom.А как DVD?
Kalewa-Uliss вне форума Ответить с цитированием
Старый 15.07.2007, 22:21   #2
Roof
Форумчанин
 
Аватар для Roof
 
Регистрация: 01.02.2007
Сообщений: 785
По умолчанию

подключи модуль MMSystem в разделе Uses.
кидай на форму две кнопки и создавай события OnClick для каждой:

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;
end.


у меня стоит CD/DVD-RW дисковод и этот код прекрасно работает.
Изо всей благодати
В руках крепко сжатых
Я донесу только капли
Roof вне форума Ответить с цитированием
Старый 16.07.2007, 07:24   #3
Simply-Art
Программист и
Участник клуба
 
Аватар для Simply-Art
 
Регистрация: 29.10.2006
Сообщений: 1,266
По умолчанию

http://pblog.ru/?p=19#more-19 какая разница, DVD, CD этот код даже виртуалы открывает, лично у меня. Не знаю какие у вас проблемы могли возникнуть?!?
Simply-Art вне форума Ответить с цитированием
Ответ
Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
открыть паскалем txt Lexus_RX_300 Паскаль, Turbo Pascal, PascalABC.NET 2 14.02.2008 06:29
открыть с помощью tarasov Win Api 3 13.12.2007 19:00
Как открыть .doc/.htm в Richedit ?? UnD)eaD)Snake Компоненты Delphi 3 27.08.2007 19:42
Как открыть CD-ROM програмно? bagdat Win Api 3 02.07.2007 14:57