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);