Thema: Delphi 64Bit Datentyp prüfen

Einzelnen Beitrag anzeigen

Benutzerbild von himitsu
himitsu

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

AW: 64Bit Datentyp prüfen

  Alt 16. Sep 2022, 15:18
Natürlich kann man alles möglich prüfen, was man will

Delphi-Quellcode:
SizeOf(Igendwas) = 8 // immer 64 Bit
SizeOf(Igendwas) = SizeOf(Pointer) // so groß wie aktuell ein Zeiger
(SizeOf(Igendwas) = 8) and Defined(CPUX64) // nur 64 Bit, wenn 64 Bit, sonst egal
(SizeOf(Igendwas) = 8) and Declared(Sonstwas) // nur 64 Bit, wenn was Anderes vorhanden, sonst egal
SizeOf(Igendwas) * 8 = 64 // wirklich 64 Bit und nicht etwa 8 Byte
...
Delphi-Quellcode:
{$IF SizeOf(Igendwas) <> SizeOf(Pointer)}
  {$MESSAGE Error 'paßt ni'}
{$IFEND}

// oder erst zur Laufzeit
Assert(SizeOf(Igendwas) = SizeOf(Pointer), 'paßt ni');
$2B or not $2B

Geändert von himitsu (16. Sep 2022 um 15:24 Uhr)
  Mit Zitat antworten Zitat