Forum: Programmieren allgemein
by Bbommel,
1. Apr 2021
Merkwürdig ist das aber schon, wenn man sich das SaveToFile von der StringList anschaut, dann läuft das letztlich über SaveToStream und das sieht so aus:
procedure TStrings.SaveToStream(Stream: TStream; Encoding: TEncoding);
var
Buffer, Preamble: TBytes;
begin
if Encoding = nil then
Encoding := FDefaultEncoding;
Buffer := Encoding.GetBytes(GetTextStr);
Forum: Programmieren allgemein
by Bbommel,
30. Mär 2021
Warum so "kompliziert" mit Streams hantieren und nicht einfach die eingebauten Funktionen nutzen?
var
strList: TStringList;
begin
strList.writeBOM:=false;
strList.SaveToFile('myfile.txt',TEncoding.UTF8);