Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2003.05.26;
Скачать: CL | DM;

Вниз

флоп   Найти похожие ветки 

 
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;
Скачать: CL | DM;

Наверх




Память: 0.46 MB
Время: 0.014 c
11-83429
Kirill
2002-08-18 11:34
2003.05.26
Горячие клавиши для меню


6-83646
acsoft
2003-03-26 06:50
2003.05.26
Нажатие кнопки на HTML-странице в TWebBrowser


14-83669
ikivio
2003-05-05 19:59
2003.05.26
Проблема с поиском файлов по тексту в WinXP


14-83699
KIR
2003-05-05 12:59
2003.05.26
Событие OnCellClick компонента TDBGrid


4-83814
ISergey
2003-03-28 17:14
2003.05.26
Вызов диалога открытия файла