Umbruchzeichen bei readln, writeline

[neus]

Hallo liebe Community.

Bei meinen Problem geht es darum das das Steuerungszeichen nicht wieder erstellt sondern gleich als Umbruch interpretiert wird.
Das Programm macht eigentlich nichts weiter wie eine TXT-Datei auslesen, und ein paar Werte ändern, die es letztendlich nur in eine Textdatei schreibt.

Aber nach jeden mal wird dieses Vierreck entfernt und als Umbruch interpretiert. Ich denke das hat vielleicht irgendwas mit einem Zeichensatz zu tun, aber ich habe noch nicht die Erfahrung und möchte wissen, wie ich das beheben kann. Es dürfen keine Umbrüche mehr kommen sondern es muss dieses "Viereck" da stehen

Mein Code:

Delphi-Quellcode:

            AssignFile(OldConfigFile,Edit5.Text+'\'+ListBox3.Items[i]+'_backup.cfg');
            AssignFile(NewConfigFile,Edit5.Text+'\'+ListBox3.Items[i]+'.cfg');
            Rewrite(NewConfigFile);
            Reset(OldConfigFile);
            // 5 Begin
            while not eof (OldConfigFile) do
            begin
              ReadLn(OldConfigFile,NewConfigText);
              NewConfigText:=StringReplace(NewConfigText,ListBox5.Items[Strreplacerule],ListBox6.Items[Strreplacerule],[rfReplaceAll]);
              WriteLn(NewConfigFile,NewConfigText);
            end;

http://pix.nofrag.com/66/8e/1f496602...721981b45b.gif

Kann mir da jemand weiterhelfen. Meine Arbeitsumgebung ist Delphi 6 ohne .NET.