请问delphi中如何进去调试hook的回调函数和消息处理函数

Question

代码是从ＣＳＤＮ下的
function StartSpy(dwThreadID : DWORD; hTarget: THandle): boolean; stdcall;
begin
  Result := false;  if g_bSpyStart then StopSpy;  if (dwThreadID <> 0) then
  begin
    g_dwTarget  := dwThreadID;
    g_dwThreadID:= GetCurrentThreadID;
    g_hSpyHook  := SetWindowsHookEx(WH_GETMESSAGE, @GetMsgProc, hInstance, dwThreadID);
    g_hTargetWin:= hTarget;    Result:= (g_hSpyHook <> 0);    if Result then
    begin
      Result:= PostThreadMessage(dwThreadID, WM_STARTSPY, g_dwThreadID, g_hTargetWin);
      Sleep(100);
      g_bSpyStart:= true;
    end;
  end
  else
    StopSpy;
end;很明显，这调用了一个getmsgproc和发送了一条WM_STARTSPY，但我下断点后总是不能进去调试，无论Ｆ７还是Ｆ８一样是走到下一行代码，请问我如何调试，先谢谢了！

Answer 1

http://blog.csdn.net/bdmh/article/details/6104475