|
|
Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
|
Опции темы | Поиск в этой теме | Опции просмотра |
#1
|
|||
|
|||
как программно открыть защелку лотка дисковода
Можно ли написать ехе-шник, запуская который открывался бы лоток дисковода.
|
#2
|
||||
|
||||
у самого ребенок кнопку на приводе выдрал)))
Код:
procedure DoDiskEject(Eject: Boolean); begin if Eject then mciSendString('set cdaudio door open', nil, 0, 0) else mciSendString('set cdaudio door closed', nil, 0, 0); end; http://zalil.ru/34651585 Левый клик на иконку в трее - меню, правый клик - открыть/закрыть. горячие клавиши в меню написаны. Пишу программы за еду. __________________ Последний раз редактировалось NumLock, 30.07.2013 в 12:31. |
#3
|
||||
|
||||
Дисковода? Если вы про 5,25 то никак, а вот для 3,5 вроде как можно подать команду на выброс дискеты. Но вот найти сейчас исходники для доса сейчас проблематично.
Жизнь такова какова она есть и больше никакова. Помогаю за спасибо. |
#4
|
|||
|
|||
to Cтрадалецъ
to NumLock Спасибо! |