Hook的问题

Question

我已经实现了Hook，但是我要在截取到相应消息后，返回数据给主程序，不知道该怎么办了function keyHookProc(nCode: Integer; WParam: WParam; LParam: LParam): LRESULT;
  stdcall;
var
  LogFile: TextFile;
  Data: TCWPStruct;
  ss: String;begin
  Result := 0;
  if nCode < 0 then
  begin
    Result := CallNextHookEx(hHk, nCode, WParam, LParam);
    Exit;
  end
  else
  begin
    Data := (PCWPStruct(LParam))^;
    if Data.message=wm_activateapp then  begin
//在此处返回数据给主程序?
    end;
  end;end;请高手指教

Answer 1

PostMessage(MainWnd,   WM_Main_Accept,   data.hwnd,   data.message);   
          {   向主窗体发送发生消息的窗口句柄   }   

Answer 2

谢谢但是我要返回的lparam是多个数据呢

Answer 3

知道主窗口句柄的话,用WM_COPYDATA消息就行了

Answer 4

各种进程间通讯的方法都可以用，少量数据传递可以考虑用SendMessage发WM_COPYDATA消息，或者用dll的共享区。