如何监控键盘按下了那个键

[蝈蝈俊]

各位大虾:
请教如何判断用户按下了那个键,(当前的窗体可能没有焦点.)
特急!急需帮助.
谢谢.

[5201314]

在form的onkeypress事件中有var Key: Char，代表按下了那个键！

[wlq]

》》如何监控键盘按下了那个键
不知你想做什么，如果想用钩子的话应该有许多例子，
或者留下地址我发你一个

[RobertLubj]

监控onkeydown事件

[蝈蝈俊]

　　我是想在任何情况下,用户按下个键时，干一些事情．(比如：当前我在用ＷＯＲＤ时我按下了(Ａ键)，然后，一段音乐被放映．用（ｈｏｏｋ）我对它不熟悉．我目前使用的是ｗｉｎｄｏｗｓ的ａｐｉ函数　RegisterHotKey
但它好象必须带一个ｃｔｒｌ,ａｌｔ，ｓｈｉｆｔ之类的键．（具体可以看我的另一个帖子　关于registerhotkey函数的问题　）
我的Ｅ＿ＭＡＩＬ是[e-mail]
垃圾的不要发到我的信箱．

[olo]

键盘Hook

[wlq]

来了，接着!

[蝈蝈俊]

你能不能描述清楚点,我一页一页的找眼睛都发呆了.那里有KeySpy的介绍.
谢谢.

[蝈蝈俊]

用ｗｉｎｄｏｗｓ的ａｐｉ函数　RegisterHotKey 它可以不带ｃｔｒｌ,ａｌｔ，ｓｈｉｆｔ之类的键．（如 registerhotkey(handle,hotkeyid3,0,VK_SPACE);它的热键就是空格键.
谢谢在我的另一个贴子上帮我用ｗｉｎｄｏｗｓ的ａｐｉ函数　RegisterHotKey解决问题的shania和hubdog
另外我想问用（ｈｏｏｋ）如何解决这个问题?

[dengdeng]

用键盘HOOK可以实现.

interface
...

function KeyboardHookHandler(iCode: Integer; wParam: WPARAM; lParam: LPARAM): LRESULT; stdcall;

implementation

hKeyboardHookProc: HHOOK;

function KeyboardHookHandler(iCode: Integer; wParam: WPARAM; lParam: LPARAM): LRESULT; stdcall;
const
_KeyPressMask = $80000000;
begin
Result := 0;
if iCode < 0 Then
begin
Result := CallNextHookEx(hKeyboardHookProc, iCode, wParam, lParam);
Exit;
end;
if ((lParam and _KeyPressMask) = 0) and (GetKeyState(VK_MENU) < 0) and (wParam = 115) then
begin
//判断输入的键值,调用相应的处理函数.
Result := 1; //返回1,系统将不再处理.
end;
end;

//在程序中加入以下代码,设置HOOK

hKeyboardHookProc := SetWindowsHookEx(WH_KEYBOARD, KeyboardHookHandler, HInstance, 0);

//在程序中加入以下代码释放HOOK.

if hKeyboardHookProc <> 0 then
begin
UnhookWindowshookEx(hKeyboardHookProc);
hKeyboardHookProc := 0;
end;

[jll]

刚看到CSDN里Delphi中的一个例子，不用Hook（用汇编），好象叫KeySpy，你可以找找看。

[蝈蝈俊]

非常感谢各位的关怀!
前面jll提到的KeySpy又是如何?

[蝈蝈俊]

没有人再看这个问题?我的问题已用ｗｉｎｄｏｗｓ的ａｐｉ函数RegisterHotKey解决了,但我想看一看其它的方法,特别是jll提到的用keyspy,我对keyspy不了解,有没有大虾帮忙解释一下关于keyspy的问题.我好结束这个问题,大家都可以分些分,我也可以安心的去干其它事情.

[蝈蝈俊]

我的e_mail改为[e-mail]

[蝈蝈俊]

jll我把delphi的帖子都卡看了,没有发现关于keyspy的,您能指点一下?