#10 <> #13#10 (CR/LF) sind selten das Problem ... die wandelt Delphi doch um? (jedenfalls mein D7)
das Einfachste ist wohl, wenn du mal alle "fehlerhaften" Zeichen entfernen läßt:
z.B.:
Delphi-Quellcode:
Var SL: TStringList;
S: StringList;
i: Integer;
SL := TStringList.Create;
SL.LoadFromFile(...);
S := SL.Text;
For i := 1 to Length(S) do
If S[i] in [#0..#7, #9, #11, #12, #14..31] Then S[i] := ' ';
SL.Text := S;
SL.SaveToFile(...);
SL.Free;
// also nur [#8, #10, #13, ' '..#127, #129..#255] zulassen
// und #10 zu #13#10 wird durch TStringList auch gleich nochmal mit behoben