Zitat von
jaenicke:
CurIn, CurOut: ^Char;
Und hierfür gibt es bereits den Datentyp
PChar.
Zitat:
SetLength(Result, Integer(CurOut) - Integer(Pointer(Result)));
Einen Zeiger in einen Integer zu konvertieren funktioniert unter
Win32, aber unter Win64 wird der Code dann so nicht mehr funktionieren. Und da der Compiler eine Spezialbehandlung für PChar bereitstellt, kann man sich die Konvertierung nach Integer auch ganz sparen.
Zitat:
SetLength(Result, CurOut - PChar(Pointer(Result)));