Integer（）类型转换在Delphi 64位上不起作用

Question

我有以下代码：

inc(integer(DestPixel), DestDelta); //DestPixel: PColorRGB; DestDelta: integer;

这在32位平台上运行良好。如果我在编译器中将平台更改为64位，则编译器会发出以下错误：

  

E2064左侧无法分配到

问题似乎出现在integer()类型转换中。我该如何解决这个问题？

Answer 1

在64位平台上，DestPixel为8字节宽，Integer为4字节，因此类型转换无效。您可以使用NativeInt来解决此问题。

inc(NativeInt(DestPixel), DestDelta);

NativeInt类型与指针大小相同，因此根据输出目标在4字节和8字节宽之间浮动。

话虽如此，我个人会使用PByte进行类型转换，因为它更准确地描述了您正在执行的操作。

inc(PByte(DestPixel), DestDelta);