什么时候可以((指针)(P)+1)^工作？

Question

我正在研究delphiXE2,我正在研究PInteger.如果我在我的delphi代码中这样做

var
  P: PInteger;
  testInt: Integer;
  Scores: array[0..4] of Integer=(33,44,56,78,78);
begin
  P := @Scores;
  testInt := (P+1)^;
  WriteLn(testInt);
  ReadLn;
end;

我收到了这个错误.

[DCC Error] Project1.dpr(23): E2015 Operator not applicable to this operand type

PS:testInt := (P+1)^;是第23行

但是,当我尝试这个

var
  PCh: PChar;
  testchar: char;
  str: array[0..4] of char=('a','b','c','d','e');
begin
  PCh := @str;
  testchar := (PCh+1)^;
  WriteLn(testchar);
  ReadLn;
end;

它运作良好!控制台可以打印'b'!

我不清楚这是怎么发生的,什么时候((指针)(P)+1)^可以工作？

Answer 1

指针算术要求编译器知道指向的元素的大小.对于类型为Pointer的无类型指针,该知识永远不会被人知道.所以你永远不能用指针进行指针运算.

Delphi一直支持AnsiChar的指针算法.最近添加了编译器指令POINTERMATH,以便对所有类型指针启用指针算法:http://blogs.embarcadero.com/abauer/2008/01/24/38852

请注意,该指令启用了加法或算术运算符以及数组索引运算符[].

因此,如果启用指针运算,则可以对除非类型指针之外的所有指针执行算术运算.否则,它仅支持指向字符类型或指向字节的指针.

话虽如此,如果您编写P [1],您的代码会更清晰.显然,这需要启用指针算法.