Delphi 64位中Integer类型转换为何无效？

本文共计228个文字，预计阅读时间需要1分钟。

以下是对原文的简化

代码示例：inc(DestPixel, DestDelta); / DestPixel: PColorRGB; DestDelta: integer;在32位平台上运行良好。若编译器平台改为64位，编译器将报错：E2064 Left side cann。

我有以下代码：

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