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