在Delphi中,GetAsyncKeyState函數用于檢測指定的虛擬鍵是否按下或釋放。
函數原型為:
function GetAsyncKeyState(vKey: Integer): SHORT;
參數vKey為要檢測的虛擬鍵碼。該函數返回一個SHORT類型的值,表示指定虛擬鍵的狀態。
返回值的解釋如下:
例如,若要檢測鍵盤上的A鍵是否被按下,可以使用以下代碼:
var keyState: SHORT; begin keyState := GetAsyncKeyState(VK_A); if keyState < 0 then ShowMessage(‘A鍵正在被按下’) else if (keyState and 1) = 1 then ShowMessage(‘A鍵在此次調用之前被按下’) else ShowMessage(‘A鍵未被按下’); end;
注意事項: