Delphi 5适配XE5项目：PInteger等未声明类型处理咨询

Delphi 5 未预定义高版本Delphi自带的PInteger、PPAnsiChar、PPointerArray三类指针别名，你可以在报错单元的类型定义区域，或者项目公共基础单元中手动添加对应声明即可解决编译报错，各类型声明如下：

• PInteger：指向Integer类型的一级指针

type
  PInteger = ^Integer;

• PPAnsiChar：指向PAnsiChar类型的二级指针

type
  PPAnsiChar = ^PAnsiChar;

• PPointerArray：指向指针数组的二级指针，需先定义基础数组类型和一级指针

type
  TPointerArray = array[0..MaxInt div SizeOf(Pointer) - 1] of Pointer;
  PPointerArray = ^TPointerArray; // 若仅缺单P前缀的PPointerArray，保留前两行即可
  PPointerArray = ^PPointerArray;

额外适配提示：Delphi 5 不原生支持通用指针算术运算，若原XE5项目中有直接对PInteger等自定义指针做偏移的代码，需要将指针强转为Integer类型后再做运算，示例如下：
原XE5写法：

Inc(PIntVar, 3);

适配Delphi 5写法：

Inc(Integer(PIntVar), 3 * SizeOf(Integer));

内容的提问来源于stack exchange，提问作者user3733328