我正在尝试将此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));
但这不正确。如何添加~
?
答案 0 :(得分:3)
在Delphi中,~
是关键字not
,所以这应该有效:
seg.binID:= seg.binID and LongInt(not ($70 shl ((vbasLength - 1) * 7)));