如何知道弹出信使服务窗口的内容,并关掉这个信使服务的窗口.求源码.100分(100分)

  • 主题发起人 主题发起人 塬上独狼
  • 开始时间 开始时间

塬上独狼

Unregistered / Unconfirmed
GUEST, unregistred user!
怎么样截获信使服务的消息内容.并在几秒钟后关掉这个消息框
 
不知道HOOK API可以不,但是用FindWindow应该可取信使服务的消息框句柄,你WM_CLOSE可关掉这个对话框。
 
取内容的话,windows可能有SDK接口,你也可发送一CTRL+C到那个对话框上,再复到你的程序中来。
 
今天忙,抛砖引玉。
信使服务包含在程序/System32/services.exe中,
你可以建立WH_SYSMSGFILTER和WH_GETMESSAGE 类型 HOOK挂接服务是系统的 Messenger。
 
有源程序就送分
 
unit Unit1;

interface

uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls;

type
TForm1 = class(TForm)
Button1: TButton;
Memo1: TMemo;
procedure Button1Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;

var
Form1: TForm1;
ID2:Array [0..255] OF Char;
implementation

{$R *.dfm}

Procedure Get2(QHwnd:Hwnd);
Var
TempH:Hwnd;
Begin
try
TempH:=FindWindowEx(QHwnd,0,'Static',nil);
SendMessage(TempH,WM_GETTEXT,255,integer(@ID2));
except end;
End;
procedure TForm1.Button1Click(Sender: TObject);
begin
if findwindow('#32770',nil)>0 then
begin
get2(findwindow('#32770',nil));
memo1.Text:=strpas(@ID2);
end;
end;

end.
 
我已经实现了远程开机、关机、注销、重启、通讯以及远程抓屏、收发文件。

现在就差远程桌面控制了,简单来说就是用一台电脑的键盘、鼠标来代替另一台电脑的
键盘、鼠标的操作。对于显示,我可以用实时的抓屏实现。

有这方面认识的朋友们帮帮小弟吧~!
 
米歇尔的程序基本可以解决问题,先谢谢了
我的本意是这样的:
向另一台已知IP地址电脑的程序中发送一个文本消息,,
程序中有一个文本框可以接收到..要求是实时接收.怎么样解决呢?
 
后退
顶部