Скачать: CL | DM;

Блокирование CD-ROM   Найти похожие ветки 

← →
lmatveev   (2004-02-26 20:04) [0]

Как заблокировать лоток CD-ROM как это делают всякие cd-писАлки?
На каких CD-ROM это можно сделать?

---

← →
Eagle-XK ©   (2004-02-27 16:41) [1]

А ВинАпи почитеть уже в лом?

---

← →
DVM ©   (2004-02-27 16:45) [2]

> А ВинАпи почитеть уже в лом?

Вряд-ли WinApi тут поможет. Лучше про ASPI почитать ИМХО.

---

← →
lmatveev   (2004-02-27 17:39) [3]

Вот вопрос как раз в том, что именно почитать. И в каком направлении.
Я надеялся, что у кого-нибудь уже есть опыт в подобных вещах и он поделится если уж не кодом, то уж хотя бы нужным направлением.

---

← →
Иван Ширко   (2004-02-27 17:47) [4]

ASPI позволяет сделать это, а заодно проверить поддержку этой команды для данного CD-ROM"a.
Скорее всего можно воспользоваться и модулем mmsystem.

---

← →
BiN ©   (2004-02-27 17:51) [5]

function LockCDDoor(DriveCD:char; Locked:boolean):Boolean;
const IOCTL_STORAGE_MEDIA_REMOVAL = $002D4804;
var hDrive : THandle;
Returned : DWORD;
DisableEject : boolean;
Drv: string;
begin
 result:=False;
 Drv:= "\\.\"+DriveCd+":";
 hDrive := CreateFile(PChar(Drv), GENERIC_READ, FILE_SHARE_READ, nil, OPEN_EXISTING, FILE_ATTRIBUTE_NORMAL, 0);
 if GetLastError <> 0 then Exit;
 try
 DisableEject := Locked;
 Result:=DeviceIoControl(hDrive,
       IOCTL_STORAGE_MEDIA_REMOVAL,
       @DisableEject,
       sizeof(DisableEject),
       nil,
       0,
       Returned,
       nil);

 finally
   CloseHandle(hDrive);
 end;
end;

---

← →
SammIk ©   (2004-02-27 23:43) [6]

Да, хочется добавить к высказыванию
> BiN ©  

Сколько раз залочил сидюк, столько раз надо разлочить

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.02 c