16,748
社区成员
发帖
与我相关
我的任务
分享
var
Tmp_Int: Byte;
begin
Tmp_Int := 254; //二进制编码:1111 1110
ShowMessage(IntToStr(Tmp_Int shr 1)); //"127"
end;
var
Tmp_Int: ShortInt; //-128 - 127
begin
Tmp_Int := -1; //二进制编码:1111 1110 ;;;1的二进制编码:0000 0001;; -1的编码是在1的基础上首位置1,符号位.后面几位按位补码即1111 1110
ShowMessage(IntToStr(Byte(Tmp_Int) shr 1)); //"127"
end;
var
Tmp_Int: Byte;
begin
Tmp_Int := 254; //二进制编码:1111 1110
ShowMessage(IntToStr(Tmp_Int shr 1)); //"127"
end;
var
Tmp_Int: ShortInt; //-128 - 127
begin
Tmp_Int := -1; //二进制编码:1111 1110 ;;;1的二进制编码:0000 0001;; -1的编码是在1的基础上首位置1,符号位.后面几位按位补码即1111 1110
ShowMessage(IntToStr(Tmp_Int shr 1)); //"127"
end;