怎样收到消息，比如wm_move？

Question

private:
procedure HookMsg(var Msg:TMessage);message wm_move;

Answer 1

to hahafan(〈〈〈郁闷中〉〉〉) 
  spyxx是怎样得到其他窗体消息的呢？

Answer 2

hookmsg 改为这样：function HookMsg(code: integer; wparam, lparam: longint): longint; stdcall;
begin
    if code = HC_ACTION then  
    begin
        if wparam= WM_MOVE then
              Form1.ListBox1.Items.Add('move');  
    end;
    result := CallNextHookEx(hookhandle, code, wparam, lparam);
end;

Answer 3

怎样得到其他窗体的消息？已经知道handle了
就像spyxx一样

Answer 4

Hook必须写在DLL里面，不要用EXE.

Answer 5

谁能告诉我，msdn有spyxx的代码，可惜我现在搞不到msdn怎样得到其他窗体的消息？已经知道handle了
就像spyxx一样
怎样得到其他窗体的消息？已经知道handle了
就像spyxx一样
怎样得到其他窗体的消息？已经知道handle了
就像spyxx一样
怎样得到其他窗体的消息？已经知道handle了
就像spyxx一样

Answer 6

用SendMessage()发送消息到你得到的窗口句柄

Answer 7

//Form1
const
  SX_MYMESSAGE = WM_USER+400;
procedure TForm1.My_SendMessage
begin
  Form2.Perform(SX_MYMESSAGE,0,0);
end;//Form2 
const
  SX_MYMESSAGE = WM_USER+400;
procedure SXMymessage(var Msg:TMessage); message SX_MYMESSAGE;procedure TForm2.SXMymessage(var Msg:Tmessage);
begin
  //your code
end;