該如何得知按鍵F12被按下呢?(非主程式窗口內) |
答題得分者是:Kingron
|
lcc1299
一般會員 發表:39 回覆:42 積分:21 註冊:2004-09-12 發送簡訊給我 |
<p>請問我用底下程式碼可以得知mouse左鍵被按下(於非主程式窗口中,當然於主程式窗口中也是會有動作):</p>
function KeyboardHookHandler(iCode:Integer;wParam:WPARAM;lParam:LPARAM):LRESULT;stdcall;export; 那請問我該怎麼改,才能得知F12被按下了呢? 有什方法可以得知按下F12時,他所回傳的wParam值呢? 謝謝大家~~我研究了好久,還是研究不出 編輯記錄
Coffee 重新編輯於 2007-11-04 19:46:16, 註解 修改分類為問題‧
|
Kingron
中階會員 發表:1 回覆:51 積分:60 註冊:2005-09-14 發送簡訊給我 |
简单的方法:你可以把那段代码更改一下,把所有的按键记录下来就可以了:
var OldHook: HHOOK; function KeyboardHookHandler(iCode:Integer;wParam:WPARAM;lParam:LPARAM):LRESULT;stdcall; begin Form1.mmo1.Lines.Add(Format('iCode: %d, wParam: %d, lParam: %d', [iCode, wParam, lParam])); Result := CallNextHookEx(OldHook, iCode, wParam, lParam); if wParam = VK_F10 then ShowMessage('F10 OK'); end; procedure TForm1.FormCreate(Sender: TObject); begin OldHook := SetWindowsHookEx(WH_KEYBOARD, KeyboardHookHandler, HInstance, 0); end; 一般地,用VK_开头的常量就可以了,普通的字母按键,其VK_ Code值就是ASCII码值,例如A就是65。 ===================引 用 文 章=================== 請問我用底下程式碼可以得知mouse左鍵被按下(於非主程式窗口中,當然於主程式窗口中也是會有動作): function KeyboardHookHandler(iCode:Integer;wParam:WPARAM;lParam:LPARAM):LRESULT;stdcall;export; begin If (wParam = WM_LBUTTONDOWN)then begin ..................end; end. 那請問我該怎麼改,才能得知F12被按下了呢? 有什方法可以得知按下F12時,他所回傳的wParam值呢? (F12只是比喻,實際上就是聆聽某一鍵被按下) 謝謝大家~~我研究了好久,還是研究不出
------
超级猛料:http://kingron.delphibbs.com |
本站聲明 |
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。 2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。 3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇! |