Форум: "Начинающим";
Текущий архив: 2007.04.29;
Скачать: [xml.tar.bz2];
Вниз
CD-ROM Найти похожие ветки
← →
..::KraN::.. (2007-04-05 22:30) [0]Подскажите, как программно открыть\закрыть дверцу CD-ROM"a?
← →
Leonid Troyanovsky © (2007-04-05 23:20) [1]
> ..::KraN::.. (05.04.07 22:30)
> Подскажите, как программно открыть\закрыть дверцу CD-ROM"a?
Например, нейропрограммированием швейцара.
--
Regards, LVT.
← →
Германн © (2007-04-06 01:08) [2]
> ..::KraN::.. (05.04.07 22:30)
>
> Подскажите, как программно открыть\закрыть дверцу CD-ROM"a?
>
Когда-то у АП был "любимый ответ" на вопрос "Как выдвинуть/задвинуть лоток CD-ROM"a". :)
А у меня на компах ни на работе, ни дома у CD-ROM"ов нет "дверцев"! :(
И что тогда делать? :)
← →
SergGG © (2007-04-06 09:41) [3]> Leonid Troyanovsky © (05.04.07 23:20) [1]
> Германн © (06.04.07 01:08) [2]
Я не понял, здесь находятся МАСТЕРА или ТРЕПАЧИ!!!!
implementation
uses MMSystem;
{$R *.dfm}
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;
← →
_Аноним (2007-04-06 11:40) [4]
> МАСТЕРА или ТРЕПАЧИ
Мастера трепа
← →
Romm © (2007-04-06 13:57) [5]
var
OpenParm:TMCI_Open_Parms;
GenParm:TMCI_Generic_Parms;
SetParm:TMCI_Set_Parms;
DI:Cardinal;
//Открытие дверцы
begin
OpenParm.lpstrDeviceType:="CDAudio";
mciSendCommand(0,mci_Open,mci_Open_Type,Longint(@OpenParm));
DI:=OpenParm.wDeviceID;
mciSendCommand(DI,mci_Set,mci_Set_Door_Open,LongInt(@SetParm));
mciSendCommand(DI,mci_Close,mci_Notify,LongInt(@GenParm));
end;
//закрытие
begin
OpenParm.lpstrDeviceType:="CDAudio";
mciSendCommand(0,mci_Open,mci_Open_Type,Longint(@OpenParm));
DI:=OpenParm.wDeviceID;
mciSendCommand(DI,mci_Set,mci_Set_Door_Closed,LongInt(@SetParm));
mciSendCommand(DI,mci_Close,mci_Notify,LongInt(@GenParm));
end;
← →
Desdechado © (2007-04-06 15:31) [6]А если у меня стоит привод с щелевой загрузкой?
Нем нет лотков и дверей.
← →
clickmaker © (2007-04-06 16:28) [7]
> [6] Desdechado © (06.04.07 15:31)
тогда наверно вопрос будет таким: "как расширить или сузить щель?" )
← →
Anatoly Podgoretsky © (2007-04-06 21:42) [8]> clickmaker (06.04.2007 16:28:07) [7]
А если вертикальная крышка или скажем ноутбук с ручным приводом.
← →
Leonid Troyanovsky © (2007-04-07 00:59) [9]
> SergGG © (06.04.07 09:41) [3]
> Я не понял, здесь находятся МАСТЕРА или ТРЕПАЧИ!!!!
А как ты их пытался различать? В смысле, что за критерии.
Во-ще-то, мастера по открыванию различных дверцев
у нас были, но сейчас они вынуждены скрываться.
--
Regards, LVT.
← →
Romm © (2007-04-07 07:13) [10]
> нейропрограммированием швейцара
тогда-
> А если вертикальная крышка или скажем ноутбук с ручным приводом.
← →
Romm © (2007-04-07 07:13) [11]
> нейропрограммированием швейцара
тогда-
> А если вертикальная крышка или скажем ноутбук с ручным приводом.
Страницы: 1 вся ветка
Форум: "Начинающим";
Текущий архив: 2007.04.29;
Скачать: [xml.tar.bz2];
Память: 0.47 MB
Время: 0.047 c
