Delphirus - прграммирование на delphi
   Все о delphi Delphirus - прграммирование на delphi
blocks.gif
Навигация
 

Главная
Статьи
Базы данных
Графика
Защита
Интернет
Система
Тексты
Мультимедиа
Файлы
Формы и окна
Другое
Советы
Базы данных
Графика
Интернет
Мультимедиа
Система
Тексты
Файлы
Файлы
Исходники
Компоненты
Инфо
Поиск по сайту
Обратная связь
Самое популярное
Аккаунт
Карта сайта

 
 
 

Советы по delphi \ Система \ CD-ROM \ Блокировка и разблокировка CD-ROM

Блокировка и разблокировка CD-ROM

Вы уж простите, что на сях... сподручней было :

//заблокировать 
void CMFcDlg::OnBnClickedButton1() 
{ 
HANDLE hDevice = CreateFile ("\\.\E:",  
 GENERIC_READ, 
 FILE_SHARE_READ | FILE_SHARE_WRITE, 
 NULL, 
 OPEN_EXISTING, 
 NULL, 
 NULL); 
DWORD dwBytesReturned = 0; 
PREVENT_MEDIA_REMOVAL pmr = {TRUE}; 
if(!DeviceIoControl (hDevice, IOCTL_STORAGE_MEDIA_REMOVAL, &pmr, sizeof(pmr),
  NULL, 0, &dwBytesReturned, NULL)) AfxMessageBox ("Door can't be locked");
CloseHandle (hDevice); 
} 

//разблокировать
void CMFcDlg::OnBnClickedButton2() 
{ 
HANDLE hDevice = CreateFile ("\\.\E:",  
 GENERIC_READ, 
 FILE_SHARE_READ | FILE_SHARE_WRITE, 
 NULL, 
 OPEN_EXISTING, 
 NULL, 
 NULL); 
DWORD dwBytesReturned = 0; 
PREVENT_MEDIA_REMOVAL pmr = {FALSE}; 
if(!DeviceIoControl (hDevice, IOCTL_STORAGE_MEDIA_REMOVAL, &pmr, sizeof(pmr),
  NULL, 0, &dwBytesReturned, NULL)) AfxMessageBox ("Door can't be unlocked");
CloseHandle (hDevice); 
} 

Название: Блокировка и разблокировка CD-ROM
Дата публикации: 2004-06-16 (3108 Прочтено)

 
 

 

Page generation 0.022 seconds