如何得到一个字节的某一位 如何得到一个字节的某一位 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 是的同意 wensusy(星之冰点)的大家都是这么干的 如果你说的是位操作函数那是肯定有的:shl(n) --按位左移n位shr(n) --按位右移n位 用and去测试a := 1 shl n;result := a and b;测试b的第n位是0或1当然得注意n的有效范围,呵呵 基本上就是那个方法了。别的法子肯定有,但是不如那个 and 来得直接些,速度也快 a:=b and $08 取第3位 c = 2;a := b and c;a 中存放了B的低位每二位;C取1,2,4,.......2的幂,得到了的相应位. Delphi中的 and,or,xor,not 用于整数时都是位运算,用于Boolean时才是逻辑运算哪 tem:Array[0..7]of Byte;b:Byte;//待判断的字节i:Integer;begin for i:=0 to 7 do begin tem[i]:=(b shr i) and $01; end;end;tem中相应的元素值就是相应位的值,未经验证哦 Delphi中专门设计了个类,叫做TBits有关位处理可以交给他,帮助有详细说明。 (Sender as TSpeedButton).Caption 赋值问题... Delphi中数据库连接语句 如何判断一个指定的程序是否已运行 问一简单问题 #字是复合键,怎么样在edit1禁止输#字? 【公告】可用分捐赠功能已经恢复。没有可用分的朋友可以给版主发短消息。 一个简单问题,有高分!在线等待! 关于拼音查找的问题,立即送分(现在知道怎么送分了),搞了一天多,急死了。 联接符 ^ 有什么用啊。 我在Table的Fields Editor中加入了一个Data字段,设为string型。后来我又想改为intger型。该如何做? TIdTCPServer的困惑 请教几个简单问题
同意 wensusy(星之冰点)的
大家都是这么干的
那是肯定有的:
shl(n) --按位左移n位
shr(n) --按位右移n位
result := a and b;测试b的第n位是0或1当然得注意n的有效范围,呵呵
别的法子肯定有,但是不如那个 and 来得直接些,速度也快
a := b and c;
a 中存放了B的低位每二位;
C取1,2,4,.......2的幂,得到了的相应位.
b:Byte;//待判断的字节
i:Integer;
begin
for i:=0 to 7 do
begin
tem[i]:=(b shr i) and $01;
end;
end;
tem中相应的元素值就是相应位的值,未经验证哦