In einem anderen Thread habe ich es nun endlich geschafft mein Vorhaben zu verwirklichen.
Dazu verwende ich, wie empfohlen, TFileStream und füge einer Datei am Ende 32 Zeichen hinzu.
Ich lese sie dann so wieder aus
Delphi-Quellcode:
aFileStream.Position := 0;
SetLength(s, aFileStream.Size - (32 * SizeOf(Char)));
aFileStream.Read(s[1], Length(s));
Die auszulesende Zeichenkette ist 32 Zeichen lang. SizeOf(Char) gibt aber 2 und 2*32 ist 64. Wieso funktioniert das trotzdem?
Wenn ich 16*SizeOf(Char) verwende funktioniert es nicht mehr und es kommt Chinesisch als Ergebnis.
Mein Zweites Problem besteht darin, dass ich gerne alle X Zeichen ein neues Zeichen in meinen String einfügen möchte. Wie geht man das am besten an?