| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Байда с отловом сообщений системы! [Delphi, Windows]
Dimaxx © (2003-08-25 13:55:00)Сабж. Вешаю на Fomr.OnMessage отлов сообщения WM_DEVICECHANGE:
function TMainForm.KOLForm1Message(var Msg: tagMSG; var Rslt: Integer): Boolean;
begin
inherited;
if Msg.Message=WM_DEVICECHANGE then
case Msg.wParam of
$8000,$8004: <действия, если вынули/вставили диск в cd-rom>
end;
end;
На VCL все проходит на "ура". А в KOL'е нифига не ловит и форма на экране не появляется. Пробовал вешать на апплет - тот же результат!
Подскажите как отловить правильно!? Кто подскажет как на лыжах по песку кататься?
Dimaxx (2003-08-27 22:50:00) [1]Сенькс! Скачал, нашел, воспроизвел у себя - работает!!!
Gandalf (2003-08-25 14:54:00) [2]У нас Бартов любитель WM_DEVICECHANGE - меня с ним пытал долго. Короче все ловится можешь мне поверить - см. BAPDriveBox.
А inherited зачем? Result:=False;
| |
