複製鏈接
請複製以下鏈接發送給好友

大寫鎖定

鎖定
大寫鎖定(Caps Lock),即將輸入狀態鎖定在大寫狀態,使輸入出為大寫英文字母,並鎖定。
中文名
大寫鎖定
外文名
Caps Lock
概    念
將輸入狀態鎖定在大寫狀態
分    類
函數

大寫鎖定設置函數

函數如下:
procedure SetCapsLockKey( vcode: Integer; down: Boolean );
begin
if Odd(GetAsyncKeyState( vcode )) <> down then
begin
keybd_event( vcode, MapVirtualkey( vcode, 0 ),
KEYEVENTF_EXTENDEDKEY, 0);
keybd_event( vcode, MapVirtualkey( vcode, 0 ),
KEYEVENTF_EXTENDEDKEY or KEYEVENTF_KEYUP, 0);
end;
end;

大寫鎖定調用方法

1、按下
SetCapsLockKey( VK_CAPITAL, True );
2、取消鎖定
SetCapsLockKey( VK_CAPITAL, False );