Вниз
Скачать: CL | DM;

Состояние дверцы сидирома   Найти похожие ветки 

 
HardClubber ©   (2003-02-16 15:18) [0]

Господа!

Не подскажете, как определить, открыта или закрыта дверца сидирома?

Заранее благодарен


 
Shadow ©   (2003-02-16 17:03) [1]

Глазами посмотреть


 
HardClubber ©   (2003-02-16 17:08) [2]

Смешно...

Мне в программе бы... у неё глазок нету....


 
Anatoly Podgoretsky ©   (2003-02-16 17:20) [3]

А в программе никак


 
ZZ ©   (2003-02-16 17:24) [4]

HardClubber
http://photo.v-home.ru/photo/smol/00000226.jpg


 
DVM ©   (2003-02-16 18:47) [5]

Обратиться к диску: если он есть, то точно закрыта.
ASPI


 
Anatoly Podgoretsky ©   (2003-02-16 18:52) [6]

Если его нет то неизвестно закрыт или нет.
Проверить состояние дверцы невозможно, можно проверить есть ли диск и читается ли


 
Ich Hasse ©   (2003-02-16 22:29) [7]

ищите конференцию по этому же поводу... там все это было


 
xfrost ©   (2003-02-16 22:33) [8]

Использовать WinAPI

Используем сообщение WM_DEVICECHANGE.


TForm1 = class(TForm)
procedure ReceiveMessage (var Msg: TMessage); message WM_DEVICECHANGE;
private
{ Private declarations }
public
{ Public declarations }
end;

...

procedure TForm1.ReceiveMessage(var Msg: TMessage);
begin
if Msg.WParam=32772 then
ShowMessage("CD-ROM Open");

if Msg.WParam=32768 then
ShowMessage("CD-ROM Close");
end;

и так далеее


 
Anatoly Podgoretsky ©   (2003-02-16 22:43) [9]

Незабудь перед проверкой работспособности выполнить две вещи

Отключить автопознование диска
и поиграться кнопочкой закрыть открыть без диска.


 
Zhenka ©   (2003-02-17 06:25) [10]

Во из форума!!

Dankin (03.12.02 17:56)
Как узнать выдвинут-ли лоток CD-ROMa или задвинут?
Ответ:
Пользуйтесь API - функцией TrayDeviceInfo(driveLetter: char; info: word):
word; в качестве параметров передавайте driveLetter - буква диска, info -
TRAY_DEVICE_INFO_GET_TRAY_OPEN_STATUS.
Возвращаемые значения: 0 - закрыт, 1 - открыт, 2 - лоток заело, 3 - лоток
сломан.



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

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



Память: 0.47 MB
Время: 0.013 c
3-30285
nkrainev
2003-03-21 20:16
2003.04.10
Подключение MySQL


3-30279
volodya_
2003-03-20 11:12
2003.04.10
ADO DBF


3-30267
yurikon03
2003-03-21 10:19
2003.04.10
Населить TTreeView данными из таблицы...


1-30348
Che
2003-03-31 19:54
2003.04.10
Выбор фаила


1-30449
OlBan
2003-03-31 09:17
2003.04.10
Как программно выбрать другое окно приложения?




   Наверх