delphi - 〜在Delphi中是什么意思？

Question

我正在尝试将此Java代码转换为Delphi。

seg.binID &= (long) ~(0x70 << ((vbasLength - 1) * 7));

我发现其中的一些等效操作，例如：

<< means shl

0x70 means $70

但是我在Delphi中找不到 ~。

到目前为止，我已经将其转换为：

seg.binID:= seg.binID and LongInt($70 shl ((vbasLength - 1) * 7));

但这是不正确的。如何添加 ~？

Answer 1

在Delphi中，~是关键字not，因此可以使用：

seg.binID:= seg.binID and LongInt(not ($70 shl ((vbasLength - 1) * 7)));