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');