Jo 2^32 = 2 hoch 32 = 1 shl 32 =
Delphi-Quellcode:
const
Power2of32: Int64 = $100000000;
Alle 2^32 mit der Konstanten Power2of32 ersetzen, oder besser so:
Delphi-Quellcode:
CurPosLo := Int64Rec(CurPos).Lo;
CurPosHi := Int64Rec(CurPos).Hi;
Du könnste dann sogar die beiden Variablen weg optimieren und gleich mit Int64Rec() casten -> SysUtils.
Ich würde ebenfalls eine einzigste Function coden, warum will man noch eine aufwendige Klasse für diese Spezialaufgabe coden ?
Gruß Hagen