delphi – 为什么PDWord不^ DWORD？

{$APPTYPE CONSOLE}
{$TYPEDADDRESS ON}

uses
  Winapi.Windows;

procedure Foo(P: PDWORD);
begin
end;

procedure Bar;
var
  dw: DWORD;
begin
  Foo(@dw);
end;

begin
end.

在XE3中编译，但在XE4，XE5，XE6和XE7中不编译。错误是

Foo(@dw);

[dcc32 Error] E2010 Incompatible types: 'PDWORD' and 'Pointer'

这感觉奇怪。所以，在一点挖掘后，似乎问题是由PDWORD的定义。人们可能自然地认为：

PDWORD = ^DWORD;

实际上是XE3的情况。在更高版本中，我们发现：

// Note: Not ^DWORD yet
PDWORD = ^CppULongInt;

奇。那么，什么是CppULongInt？

CppULongInt = type LongWord; 
{$EXTERNALSYM CppULongInt 'unsigned long'} 
{$OBJTYPENAME CppULongInt 'Bul' 'Gm'}

然后看看DWORD的声明，我们发现：

//NOTE: DWORD should really be CppULongInt
DWORD = LongWord;

所以，CppULongInt和DWORD是不同的类型。因此编译错误。

这里发生了什么？ CppULongInt的目的是什么？为什么RTL设计者似乎想要将DWORD别名为CppULongInt。此更改是否与基于LLVM的x64 Windows C编译器相关？我是世界上唯一使用{$ TYPEDADDRESS ON}的人吗？

注意，最后一个问题是修辞。