Discussion :

[pirbd]

Bonjour,

J'essaie de faire marcher un hook sur mon application. Le tout marche plutot pas mal mais mon hook ne capte pas les messages que j'envoie par PostMessage alors qu'il capte ceux envoyés par SendMessage...

Quelqu'un a une idée d'ou peut venir mon probleme ?

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
 
//##################################
// Ajout du Hook
mHookWndCall      := SetWindowsHookEx(WH_CALLWNDPROC,@NewCallWndProc,Hinstance,GetCurrentThreadID);
 
//##################################
// Mon Hook
function NewCallWndProc(aCode: Integer; awParam: WPARAM; alParam: LPARAM): LRESULT; stdcall;
var
  pMessage : PCWPSTRUCT;
  lMsg : TMessage;
  lControl : TWinControl;
  lPoint : TPoint;
  lRect : TRect;
begin
    pMessage := PCWPSTRUCT( alParam );
 
    //// -------------------------------
    lMsg.Msg := pMessage^.message;
    lMsg.LParam := pMessage^.lParam;
    lMsg.WParam := pMessage^.wParam;
    lMsg.Result := 0;
    lControl := FindControl(pMessage^.hwnd);
    if lControl<>nil then
      Trace.WriteWndMsg(lMSg,lControl.ClassName)
    else
      Trace.WriteWndMsg(lMSg);
    //// -------------------------------
 
  ////  ....
 
  Result := CallNextHookEx(mHookWndCall, aCode, awParam, alParam );
end;
 
//##################################
// Envoi d'un message
PostMessage(Handle,WM_USER,0,0);

En surchargeant le wndProc du controle auquel j'envoie le message je peux voir que le SendMessage et le PostMessage marchent

[pirbd]

Personne n'a la moindre petite idée ?

[LadyWasky]

Salut,
j'espère que tu n'as pas oublié UnhookWindowsHookEx dans ton code


Sinon
Le Hook WH_CALLWNDPROC ne fonctionne que si le message à été envoyé avec SendMessage.
Pourquoi ? parce que SendMessage "demande au système de
- passer le message au Hooks présents
- puis relaye le message à la procédure de la fenètre de destination

Alors que PostMessage, l'envoie directement a la procédure de la fenètre de destination.

Bref, PostMessage est à l'email ce que SendMessage est au Coliposte (avec le facteur qui ouvre ton colis)

C'est pour ça que si tu veux simuler un clic de souris, tu as de façons de faire (voir le dernier défi Delphi).

Avec PostMessage, l'envoi du message WM_LeftClick est envoyé directement à la fenètre et le curseur de la souris ne bouge pas à l'écran alors qu'avec SendMessage, si.

Le seul moyen d'intercepter un PosMessage, c'est avec GetMessage ou PeekMessage, placé dans la boucle d'un thread

Bon dev

[pirbd]

j'espère que tu n'as pas oublié UnhookWindowsHookEx dans ton code

No problem, je l'ai bien fait

Merci pour l'explication, c'est bien ce que j'avais observé mais je me demandais si iavait pas moyen de les capter quand meme..., on va dire que c'est po possib alors


Encore merci.