free pascal keyboard單元過程函數(shù)詳解

1、索引：DoneKeyboardFunctionKeyNameGetKeyboardDriverGetKeyEventGetKeyEventGetKeyEventCodeGetKeyEvntFlagsGetKeyEventShiftStateGetKeyEventUniCodeInitKeyBoardIsFunctionKeyKeyEventToStringPollKeyEventPollShiftStateEventPutKeyEven

2、tSetKeyboardDriverShiftStateToStringTranslateKeyEventTranslateKeyEventUniCode這個單元實(shí)現(xiàn)獨(dú)立于系統(tǒng)的鍵盤接入層，它可以用來輪詢鍵盤狀態(tài)，并等待某些事件。等待鍵盤事件可以通過GetKeyEvent函數(shù)來實(shí)現(xiàn)，它會返回一個依賴驅(qū)動程序的鍵盤事件。這個事件可以由translatekeyevent函數(shù)轉(zhuǎn)換成可解釋事件。這個函數(shù)的結(jié)果可用于其他事件檢查函數(shù)。一個自定義的

3、鍵盤驅(qū)動程序（keyboarddriver）可由SetKeyboardDriver函數(shù)安裝。當(dāng)前鍵盤驅(qū)動程序可以用GetKeyBoardDriver檢索。使用這個單元，一開始要調(diào)用InitKeyboard，最后要調(diào)用DoneKeyBoard。（后面的程序都是這樣。）注：經(jīng)測試，下文的功能鍵指F1~F12及方向鍵和Home、End、、PageUp、PageDown、。下文說的shift應(yīng)該是指shift、ctrl、alt。檢測shift狀

4、態(tài)時返回結(jié)果是這三個鍵中任意多個被按下或都未按下。常量：以下常量定義了一些錯誤常量，可能由鍵盤函數(shù)返回：errKbdBase=1010errKbdInitErr=errKbdBase0errKbdNotImplemented=errKbdBase1以下常量表示指定的鍵盤按鍵。第一個常量指定了功能鍵：constkbdF1=$FF01kbdF2=$FF02kbdF3=$FF03kbdF4=$FF04kbdF5=$FF05kbdF6=$FF0

5、6kbdF7=$FF07kbdF8=$FF08kbdF9=$FF09kbdF10=$FF0A(HomeUpPgUpLeftdleRightEndDownPgDn)他們可以被改成本地化的鍵名當(dāng)需要的時候。類型：TKeyEvent類型是鍵盤事件的基礎(chǔ)類型：TKeyEvent=Longint擊鍵用4字節(jié)的TKryEvent類型編碼。擊鍵的不同變量編碼通過轉(zhuǎn)換TKeyEvent類型到TKETRecd類型。TKeyRecd=packedrecdK

6、eyCode:WdShiftStateFlags:Byteend以下為TKeyRecd結(jié)構(gòu)體的解釋：變量意義KeyCode視于flags，物理表現(xiàn)的一個按鍵（在dos下掃描碼，II碼對）或翻譯的IIunicode字母。Shiftstate按下一個鍵是shift的狀態(tài)。Flags決定怎樣解釋KeyCodeShift的狀態(tài)可以用不同的shift狀態(tài)常量檢查，最后一個類型中的標(biāo)記可以用kbII、kbUniCode、kbFnKey、kbPhys

7、、kbReleased常量中的一個檢查。如果兩個按鍵返回同樣的字符按鍵，沒有辦法找出按下了哪一個。如果需要知道，未翻譯的字符碼必須使用，但是這依賴于系統(tǒng)。依賴于系統(tǒng)的常量被定義來覆蓋這些，它們有可能有同樣的名字。TKeyboardDriver記錄可以被用來安裝一個自定義的鍵盤驅(qū)動通過使用SetKeyboardDriver函數(shù)。TypeTKeyboardDriver=RecdInitDriver:ProcedureDoneDriver:P

8、rocedureGetKeyEvent:Function:TKeyEventPollKeyEvent:Function:TKeyEventGetShiftState:Function:ByteTranslateKeyEvent:Function(KeyEvent:TKeyEvent):TKeyEventTranslateKeyEventUniCode:Function(KeyEvent:TKeyEvent):TKeyEventend不同