Глобальная отловля сообщения(message)

[саша40]

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

[Пепел Феникса]

1)что за сообщение?(может есть иной выход)
2)хук на сообщения, и там уже разбираться что пришло, но это плохой вариант.

[саша40]

Сообщение от Пепел Феникса

1)что за сообщение?(может есть иной выход)
2)хук на сообщения, и там уже разбираться что пришло, но это плохой вариант.

1)типа WM_PASTE, WM_Copy, WM_Cut

[Человек_Борща]

А что там сложного?
SetWindowsHookEx , где idHook = WH_CALLWNDPROC

Перехватываешь оконную процедуру окна и получаешь все WM_* сообщения, до того как их получит оригинальный WndProc.
С WH_CALLWNDPROCRET получаешь все WM_* уже после того, как они были обработаны окном.

Или же WH_GETMESSAGE, чтобы мониторить очереди оконных сообщений.

[саша40]

минуту, а WH_... это тоже как бы сообщения? Или их как-то по другому надо обработать?

[саша40]

Сообщение от Человек_Борща

Или же WH_GETMESSAGE, чтобы мониторить очереди оконных сообщений.

а вот это, пожалуйста, подробней.

[Stilet]

WH_... это тоже как бы сообщения?

Нет, это тип ловушки-фильтра. WH_KEYBOARD например пропускают все сообщения в очереди кроме клавиатурных. WH_GETMESSAGE по-моему ни одного не пропускают. По крайней мере это ловушка для сообщений, обрабатываемых функциямии GetMessage и PeekMessage

[саша40]

Дело в том, что я хочу в данный момент переловить сообщения, которые посылает SendMessage. Для этого должен использоватся фильтр: WH_CALLWNDPROC. Так вот, а что произойдет если сообщение будет отправлено(хоть проводником)?

[саша40]

И ещё каким задать второй параметр для SetWindowsHookEx?

[саша40]

Вот что-то накопал:

function HookCopyClipBoard(Code: Integer; WParam: word; LParam: Longint): Longint; stdcall;

var
HM: HHOOK;

//onCreate- ловушка должна работать при работе процесса
HM:=SetWindowsHookEx(WH_CALLWNDPROC,@HookCopyClipBoard,hInstance,0);

//функция
var
tag: PEVENTMSG;
begin
if Code>=0 then 
begin
result:=0;
tag:=Pointer(LParam);
if tag.message=WM_Copy then 
begin
//обрабатываем сообщение
end;
end
else
result:=CALLNextHookEx(HM,code,WParam,LParam);
end;

//onDestroy 
UnHookWindowsHookEx(HM); //снимаем ловушку

посмотрите, как вам?