Shr

From Lazarus wiki
Revision as of 20:18, 27 April 2013 by Jwdietrich (talk | contribs)
Jump to navigationJump to search

Shift right (shr) performs a right bit-shift operation (opposite than shl).


Is a bit set

function isBitSet(AValue, ABitNumber:integer):boolean;
begin
   result:=odd(AValue shr ABitNumber);
end;

Read more