Форум: "Система";
Текущий архив: 2003.05.26;
Скачать: [xml.tar.bz2];
Внизфлоп Найти похожие ветки
← →
ed (2003-03-25 23:42) [0]Господа, как програмно, запретить FDD читать дскету?
← →
Бобко Сергей (2003-03-26 06:33) [1]Можно просто закрыть флоп, например так:
const
FSCTL_LOCK_VOLUME = 589848;
FSCTL_UNLOCK_VOLUME = 589852;
var
fHandle:THandle;
cbReturn:Cardinal;
begin
fHandle:=CreateFile("\\.\A:",GENERIC_ALL, FILE_SHARE_READ or FILE_SHARE_WRITE,
nil, OPEN_EXISTING,FILE_ATTRIBUTE_NORMAL,0);
if fHandle=0 then WriteLN("fHandle == 0");
if not DeviceIoControl(fHandle,FSCTL_LOCK_VOLUME,nil, 0, nil, 0,cbReturn,nil)
then WriteLN("Device Control Error");
CloseHandle(fHandle);
WriteLN("End of Program");
readln;
end.
← →
ed (2003-03-26 23:32) [2]Спасибо за ответ, но что значит закрыть.
Я пока только учусь, причём самоучка.
Страницы: 1 вся ветка
Форум: "Система";
Текущий архив: 2003.05.26;
Скачать: [xml.tar.bz2];
Память: 0.44 MB
Время: 0.007 c