在delphi 10.2中使用TULargeInteger进行铸造东京与以前的版本不同

Question

使用TULargeInteger和新编译器10.2进行铸造缺少attribut LowPart和HighPart。

uses Winapi.Windows; 

    function RetLargeInt: Int64; 
    var 
     ALow: DWORD; 

    begin 
     {Do Something 
     With ALow 
     } 
     TULargeInteger(Result).LowPart := ALow; {Missing 'LowPart'} 
    end; 

    procedure AProc; 
    var 
    ALocalInt: Int64; 
    begin 
     ALocalInt := RetLargeInt; 
     {Do Something} 
    end; 

Answer 1

在10.2东京的TULargeInteger声明已经改变从：

TULargeInteger = ULARGE_INTEGER; 

到：

TULargeInteger = UInt64; 

这意味着你不再能够访问暴露LowPart的ULARGE_INTEGER记录字段。

ULARGE_INTEGER = record 
    case Integer of 
    0: (
     LowPart: DWORD; 
     HighPart: DWORD); 
    1: (
     QuadPart: ULONGLONG); 
    end; 

---

您可以更改代码以使用ULARGE_INTEGER代替：

ULARGE_INTEGER(Result).LowPart := ALow;