KeyBoardProc, расшифровка lParam

[KoBaL]

Подскажите, как расшифровать lParam?

http://msdn.microsoft.com/en-us/libr...(v=vs.85).aspx

Никак не могу понять, как мне, например, получить значение из 31 бита, чтобы узнать: нажата клавиша или отпущена?

[Stilet]

Если не ошибаюсь:

 if  (lParam and $40000000 ) = 0 then нажата

[Vapaamies]

Если считать, как все нормальные программисты, с нуля, как считает MSDN, биты 32-битного целого нумеруются от 0 до 31, и 31-й бит имеет маску $80000000.

[phomm]

Наверное, обычными битовыми операциями, что-то вроде

if lParam and (1 shl 31) = 0 then // 31'th bit is 0 when button pressed
begin
//нажата
end;

пс. сорри , опять страдаю постом в нерефрешеные темы