| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL | | Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

	« предыдущая ветвь | форум | следующая ветвь »

помогите с отловом WM_SYSCOMMAND [D6, Win2k]

andruxin ©   (2004-05-16 20:32:00) 

Поискав отлов этого сообщеня  было найдено следующее( и не только такие конструкции были и другие):

[CODE]procedure TForm1.FormCreate(Sender: TObject);
begin
Application.OnMessage := AppOnMessage;
end;

procedure TForm1.AppOnMessage(VAR Msg: TMsg; VAR Handled: Boolean);
BEGIN
IF (Msg.Message = WM_SYSCOMMAND)and(msg.wParam=sc_monitorpower) THEN memo1.Lines.Add('Событие');
END;[/CODE]

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

Заранее спасибо.

---

Игорь Шевченко   (2004-05-17 10:34:00) [1]

WM_SYSCOMMAND с параметром SC_MONITORPOWER посылается ТОЛЬКО активному окну.

---

Rouse_   (2004-05-16 23:42:00) [2]

A window receives this message when the user chooses a command from the window menu (formerly known as the system or control menu) or when the user chooses the maximize button, minimize button, restore button, or close button.

Так про какой трей ты говоришь?

---

Наверх