Integer()类型转换在Delphi 64位上不起作用

我有以下代码：

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

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

E2064 Left side cannot be assigned to

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

解决方法

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

inc(NativeInt(DestPixel),DestDelta);

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

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

inc(PByte(DestPixel),DestDelta);