在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;