怎么取字节中某一位的值？？

Question

在c中可以有bit，可是在delphi中应该怎么来定义和取到某一位？？
     
     比如取16进制28的第0位，我知道应该是0，第三位，我知道应该是1；可是怎么来定义一个变量把取出来的值放进去，还有就是怎么来取？？

Answer 1

什么意思，你是说把byte转换成二进制字符串？？
应该有位操作函数吧。。

Answer 2

用移位(shr)和与(and)运算
function GetBit(num: Integer;n: Byte): Byte;
begin
  Result := (num shr n) and 1;
end;

Answer 3

if ((2 and 2)=2) then
  //左数第二位是1,就是说
if ((a and b)=a) then
  //将b的值分别取二进制的左数第几位为1的值