怎样得到windows当前活动窗口的句柄?(在线发分)(30分)

我

我爱PASCAL

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-07-05

• #1

麻烦您写一下代码,本人比较菜

 

H

happycyp

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-07-05

• #2

var
h : HWND ;
begin
h := GetForegroundWindow;
Showmessage(IntTostr(h));
end;

 

S

smallpig8191981

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-07-05

• #3

同二楼

但showmessage是否有点问题？？

 

C

COODOR

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-07-05

• #4

拜托，h := GetForegroundWindow;
ShowMessage你可以不用

 

我

我爱PASCAL

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-07-05

• #5

[]