Форум: "Система";
Текущий архив: 2003.04.28;
Скачать: [xml.tar.bz2];
ВнизБлокировка лотка CD-ROM Найти похожие ветки
← →
coolcat (2003-03-08 23:08) [0]Нужно научить программу блокировать лоток CD-привода (лоток привода не открывается ни программно, ни аппаратно).
Подскажите кто может.
← →
Song (2003-03-08 23:10) [1]MCISendString()
← →
Романов Р.В. (2003-03-08 23:13) [2]ExitWindowsEx
← →
AlexandrRya (2003-03-08 23:51) [3]Не знаю, какое отношение имеет ExitWindowsEx к сабжу, но я когда-то яспользовал DeviceIOControl, правда ее использование очень сильно отличается в 9x, Me от 2k,NT,XP, и, если щелкнуть по диску правой копкой, выбрать Извлечь, то винда покажет окно, что диск заблокирован, и предложить разблокировать его (нажать Ок или Да - не помню), после чего все же извлечет диск, ну а в остальном - все нормально.
← →
Романов Р.В. (2003-03-09 08:49) [4]AlexandrRya (08.03.03 23:51)
Самое прямое. Выключаем компьютер и окрыть лоток можно будет только с помощью отвертки
← →
Esc (2003-03-09 12:11) [5]Есть такой юнит VWin32.pas, там много полезностей...
Есть там такая ф-я LockRemovableMedia - вот она умеет блокировать кнопку CD-ROM"a(в Win98, в других не проверял), но остаётся возможность програмного извлечения лотка(Диск->Извлечь).
← →
maniyak (2003-03-09 12:54) [6]По FIDO разжевывали, есть юнит для НТей, пишите
← →
easy (2003-03-09 15:12) [7]procedure tform1.LockUnlock(lu:boolean);
var
Buffer:array[0..1023] of char;
begin
if lu then controlcode:= FSCTL_LOCK_VOLUME else controlcode:= FSCTL_UNLOCK_VOLUME;
hDrive := CreateFile("\\.\F:",
GENERIC_READ, FILE_SHARE_READ or FILE_SHARE_WRITE,
nil, OPEN_EXISTING, 0, 0);
{ if hDrive= INVALID_HANDLE_VALUE then
showmessage("dont CreateFile"); }
DeviceIoControl(hDrive,IOCTL_STORAGE_MEDIA_REMOVAL,@lu,sizeof(lu),nil,0,DummyReturnedBytes,nil);
FormatMessage (FORMAT_MESSAGE_FROM_SYSTEM, nil, GetLastError, LANG_NEUTRAL, @Buffer, 1024, nil);
ShowMessage(StrPas(Buffer));
CloseHandle(hDrive);
end;
Страницы: 1 вся ветка
Форум: "Система";
Текущий архив: 2003.04.28;
Скачать: [xml.tar.bz2];
Память: 0.46 MB
Время: 0.008 c