1. [WIN] Win32lib Suggestion
- Posted by kennethroger at prodigy.net Apr 18, 2001
- 418 views
In the function getKeyMasks(), the effect of CapsLock could be included by using code such as the following: integer shl, sh --is ShiftLock toggled? shl=and_bits(#0001,c_func(xGetKeyState,{VK_CAPITAL})) --is Shift pressed? sh=and_bits(#0080,c_func(xGetKeyState,{VK_SHIFT})) --set state flag for (effective) shift if (sh and (not shl)) or ((not sh) and shl) then flags += ShiftMask end if