Delphi——从Integer到Byte类型（负数转换）

Question

我测试了一些代码：

var
   B: Byte;
   I: Integer;
begin
   I := -10;
   B := I;
end;

我希望在数字 10 中的变量中看到结果（因为这是 integer 类型的低字节）。 但结果是 B => 246。

从逻辑上讲，我理解 246 = 256 - 10，但我不明白为什么会这样？

Answer 1

对于值为 -10 的 integer 的最低有效 (ls) 字节，您期望值为 10 是不正确的。

负数根据称为2's complement的系统进行编码，其中值 -1 作为四字节 integer 编码为 $FFFFFFFF，-2 编码为 $FFFFFFFE，-3 编码为 $FFFFFFFD... -10 编码为 $FFFFFFFF6...等等。 这是目前大多数计算机/软件使用的系统。

还有其他系统。 您可能想到的是一个称为Signed magnitude的系统（请参阅： https://en.wikipedia.org/wiki/Signed_number_representations ），其中最高有效位在设置时表示负值，而实际数字的编码位置对于负数和正数都相同（定义两个零值 +0 和 -0 会带来不便）。

Answer 2

值-10是 Integer 中的$FFFFFFF6 Integer 。 将其分配给宽度较小的类型只会截断该值 - 这意味着B中的值将是$F6 ，即246 。

如果您使用范围检查进行编译，您将得到一个异常，因为-10不适合Byte 。

如果你想把一个负数变成一个正数，你需要使用Abs function。