Einzelnen Beitrag anzeigen

Benutzerbild von himitsu
himitsu

Registriert seit: 11. Okt 2003
Ort: Elbflorenz
44.184 Beiträge
 
Delphi 12 Athens
 
#11

AW: Re: Größe einer Datei bestimmen

  Alt 13. Okt 2012, 04:25
Delphi-Quellcode:
Result := (Int64(wfd.nFileSizeHigh) shl 32) or wfd.nFileSizeLow;

// oder

Int64Rec(Result).Lo := wfd.nFileSizeLow;
Int64Rec(Result).Hi := wfd.nFileSizeHigh;
Und nein, das mit MAXDWORD funktioniert auch ... also wenn man es richtig macht.
Result := (Int64(wfd.nFileSizeHigh) * (Int64(MAXDWORD) + 1)) + Int64(wfd.nFileSizeLow); Aber wenn man weiß, wie in einem 32-Bit-Delphi die 64-Integeroperationen aufgebaut sind, dann läßt man soeinen Mist wie * (MUL), DIV und MOD.
$2B or not $2B

Geändert von himitsu (13. Okt 2012 um 04:28 Uhr)
  Mit Zitat antworten Zitat