全國最多中醫師線上諮詢網站-台灣中醫網
發文 回覆 瀏覽次數:1810
推到 Plurk!
推到 Facebook!

該如何得知按鍵F12被按下呢?(非主程式窗口內)

答題得分者是:Kingron
lcc1299
一般會員


發表:39
回覆:42
積分:21
註冊:2004-09-12

發送簡訊給我
#1 引用回覆 回覆 發表時間:2006-09-13 16:22:21 IP:59.127.xxx.xxx 未訂閱
<p>請問我用底下程式碼可以得知mouse左鍵被按下(於非主程式窗口中,當然於主程式窗口中也是會有動作):</p>

function KeyboardHookHandler(iCode:Integer;wParam:WPARAM;lParam:LPARAM):LRESULT;stdcall;export;
begin
If (wParam = WM_LBUTTONDOWN)then begin ..................end;
end.


那請問我該怎麼改,才能得知F12被按下了呢?


有什方法可以得知按下F12時,他所回傳的wParam值呢?
(F12只是比喻,實際上就是聆聽某一鍵被按下)


謝謝大家~~我研究了好久,還是研究不出

編輯記錄
Coffee 重新編輯於 2007-11-04 19:46:16, 註解 修改分類為問題‧
Kingron
中階會員


發表:1
回覆:51
積分:60
註冊:2005-09-14

發送簡訊給我
#2 引用回覆 回覆 發表時間:2006-12-11 13:22:17 IP:61.143.xxx.xxx 未訂閱
 简单的方法:你可以把那段代码更改一下,把所有的按键记录下来就可以了:
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
系統時間:2024-03-28 22:33:16
聯絡我們 | Delphi K.Top討論版
本站聲明
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇!