[WIN] Win32lib Suggestion
- Posted by kennethroger at prodigy.net Apr 18, 2001
- 417 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
