Zitat von
SirRobert:
das stimmt, aber in dem String befinden sich auch: #$D#$A 's
Die will ich ausschließen und nicht entfernen!
@CK_CK
Ich befürchte, dass nach den Leerzeichen nicht geprüft werden darf...
Ob es schneller geht, weiß ich nicht (ausprobieren), aber möglich ist folgendes Verfahren:
Delphi-Quellcode:
const sCRLF = 'ABRAkadaBRA1279${]'; // also irgendwelcher Schrott
sTemp := StringReplace(TestString, #$D#$A, sCRLF, [rfReplaceAll]);
sTemp := StringReplace(sTemp, #$A, '', [rfReplaceAll]);
Result := StringReplace(sTemp, sCRLF, #$D#$A,[rfReplaceAll]);
Gruß Jürgen