将 C 中的按位语句转换为 Delphi

Question

C 中的以下语句：

iONE >>= iShift;
iONE &= 0xffefffff;
iONE |= (((((long)(*temp & 0x7f) - 65) << 2) + iShift + 1023) << 20) | (iTWO & 0x80000000);

在 Delphi 中是否有 shr=、And= 和 Or= 之类的东西。有没有比字面移植更合适的方式，尤其是第三条语句。

Answer 1

这些基本上是两个操作的组合。
x >>= y 表示x = x >> y。
这同样适用于&= 和|=。
对于 Delphi 部分：And、Or 和 Right Shift。