SlaUr, всё верно. wParam, он же fActive (boolean) определяет, что произошло: активация или деактивация, а второй параметр - lParam, он же dwThreadId, содержит идентификатор потока - владельца окна, которое активируется при fActive = TRUE или деактивируется, если fActive = FALSE. При смене активного окна сообщение посылается дважды: сначала приложению, которое теряет фокус (fActive = FALSE), потом приложению, которое его получает (fActive = TRUE).
строго говоря, оно не "тоже работает", а только оно и работает. если ты посмотришь код TApplication, там есть процедурина, переопределяющая WndProc. в ней прописан case Msg of. погляди на этот кейс. все события уровня приложения, то, что висит в AppEvents, отрабатываются именно в нём:
| Код |
...
WM_ACTIVATEAPP:
begin
Default;
FActive := TWMActivateApp(Message).Active;
if TWMActivateApp(Message).Active then
begin
RestoreTopMosts;
PostMessage(FHandle, CM_ACTIVATE, 0, 0)
end
else
begin
NormalizeTopMosts;
PostMessage(FHandle, CM_DEACTIVATE, 0, 0);
end;
end;
...
|
а AppEvents просто присваивает собственные Notifier'ы событиям внутренней переменной Application.
так что на самом деле, способ всего один - WM_ACTIVATEAPP, всё остальное - для удобства 
Добавлено @ 15:41
пока писал, забыл, что хотел сказать. чтобы двойной сработки не было, проверяй Msg.wParam на 0 (деактивация) или >0 (активация). т.е., по сути, boolean. |