如何截获Messenger(信使服务)，不让它弹出对话框而在自己编的程序列中显示

Question

如题！
我现在用的方法是监视屏幕窗口，出现信使对话框就把内容Copy下来，然后关闭对话框，但是会出现对话一闪的现象，有没有更好的方法，如果能挂钩子最好

Answer 1

msg plus
msn Helper
应该都有这样的功能吧。
另：
你是怎样监视屏幕窗口的呢？

Answer 2

看看这样行不行：
procedure TForm1.Button1Click(Sender: TObject);
var
  Handle:THandle;
  Buf: array[0..1024] of Char;
begin
  Handle:=FindWindow(nil,'信使服务 ');//注意，后面有一个空格
  Handle:=FindWindowEX(Handle,0,'static',nil);
  SendMessage(Handle, WM_GETTEXT, 1024, Integer(@Buf));
  Memo1.Text:=buf;
end;

Answer 3

楼上说的对，这样的方法根本就是在投机取巧，我想正确的方法是把MSG服务在你机器上关闭，然后自己做程序帮定在指定MSG消息端口监听，然后当收到信息时显示

Answer 4

to Shikari(最爱.NET)
这种方法当然是最好的了，不过我查了很多资料也没有找到相关的资料
截获的包不知如何解释

Answer 5

MSDN有Messenger SDK啊,你可以找找看有没有人把它转化成了Delphi单元，如果没有，就自己试着转化了，然后直接做Messenger开发，甚至你都可以自己写一个MSN Messenger来哦:)