delphi - CArdinal 不兼容类型错误 DelphiXE2

Question

我不太明白这个“不兼容的类型”错误(Delphi XE2)

function TWaveBase.GetHandle: THandle;
begin
  if HandleNeeded then begin
    if HandleAllocated then
      CloseHandle;
    CreateHandle(False);
  end;
  FHandleNeeded:=False;
  Result:=FHandle;
end;

[...]
property Handle:Cardinal read GetHandle; -> 此处出错

Answer 1

THandle是基于 Cardinal 声明的类型在德尔福 XE 中。 (由于64位和跨平台，在XE2中定义为NativeUInt)。这是一种新类型。

如果您的 GetHandle getter 返回一个 THandle ，您的属性也应声明为 THandle .改变它，事情应该可以正常工作。