DataString eines TStringStreams ist immer UTF-16 - egal was man als Encoding einstellt?!
Ich würde den String einfach so in "rohe Bytes" umwandeln:
TEncoding.UTF8.GetBytes('Ein beliebiger Text.')
Wer hat denn etwas von Datei laden gesagt?
Seine Funktion "WriteLogline1" lädt die Datei nun mal.