怎样判断 Shift 键及 Caps Lock 被按下

[woaiaxuan]

const
_keypressmask = $8000;
var
i:getkeystate($10);
begin
if ((i and _KeyPressMask)=_KeyPressMask) then

最下面的那句
(i and _KeyPressMask)=_KeyPressMask
是指 Shift 键被按下还是没有被按下？
还有_keypressmask = $8000;这句的作用是什么？
谁在的指点下啊

刚才在Delphi Windows SDK/API版发了一次.看到那个版块没多少人,就来这里又发了次.希望有人能帮忙解决~~

[老之]

if ((i and _KeyPressMask)=_KeyPressMask) then 是按下Shift

$8000 转成二进制是1000000000000000, 最高位为1， and运算是判断i的最高为是否为1，如果是1就表示按下了。