Форум: "Потрепаться";
Текущий архив: 2002.03.21;
Скачать: [xml.tar.bz2];
ВнизЛоток CD-ROM Найти похожие ветки
← →
Olgerd (2001-12-02 19:01) [2]Похоже что никак. Если только самому выдвинуть(
uses MMSystem;
), тогда будешь знать, что открыт.
procedure TForm1.Button1Click(Sender: TObject);
begin
mciSendString("Set cdaudio door open wait",
nil, 0, Form1.Handle);
end;
Страницы: 1 вся ветка
Форум: "Потрепаться";
Текущий архив: 2002.03.21;
Скачать: [xml.tar.bz2];
Память: 0.43 MB
Время: 0.005 c