怎么样判断当前应用程序(100分)

  • 主题发起人 主题发起人 liushijun
  • 开始时间 开始时间
L

liushijun

Unregistered / Unconfirmed
GUEST, unregistred user!
怎么判断当前应用程序是不是自己想要的应用程序??
 
什么意思?
 
procedure CheckWindow;
var
WindowH:HWnd;
Buf:array[0..1024]of Char;
begin
WindowH:=GetForegroundWindow;
FillChar(Buf,1024,0);
SendMessage(WindowH,WM_GETTEXT,1024,Integer(@Buf[0]));
Form1.Memo1.Lines.Add('标题: '+String(Buf));
//now the title is in Buf :)
//your code here...
end;

不知道你要的是不是这个...
 
下面的程序能列出所有窗口
var
hcrrentwindow:hwnd;
sztext:array[0..254] of char;
s:string;
begin
hcrrentwindow:=GetWindow(handle,GW_HWNDFIRST);
while hcrrentwindow<>0do
begin
if GetWindowtext(hcrrentwindow,@sztext,255)>0 then
begin
s:=strpas(@sztext);
Memo1.Lines.Add(s);
end;
hcrrentwindow:=GetWindow(hcrrentwindow,GW_HWNDNEXT);
end;
end;
 
接受答案了.
 
其实我要的就是判断应用程序的切换
当然知道可以接收系统消息来判断,但是我是给游戏编程
大家都知道,游戏一般都有外挂,我利用钩子来判断玩家按键后当前的窗口是否改变(当
然游戏里有的按键本身就有窗口弹出,所以要判断弹出的是不是游戏自身的,而且游戏里
面的窗口名称可能也会不同),如果窗口改变就给予提示并且关闭当前游戏
 
后退
顶部