Leider noch nicht ganz. Mit 24 ist nicht die Zahl gemeint sonder das 24 Bit deines 32 Bit-Integers. So wie 2 für binär 10 steht. Musst du hier auch das Equivalent zum 24 Bit in Hex oder Dezimal angeben. Also musst du auf diese Zahl 1000 0000 0000 0000 0000 0000 in Hex also auf $800000 prüfen sprich.
Delphi-Quellcode:
if ((lparam AND $800000) > 0) then
begin
...
end;
[edit] Ich verweißte hier nochmal gerne auf das Tutorial, da wird das sehr anschaulich erklärt. [/edit]