Einzelnen Beitrag anzeigen

Benutzerbild von holliesoft
holliesoft

Registriert seit: 4. Apr 2005
Ort: Gau-Algesheim
250 Beiträge
 
FreePascal / Lazarus
 
#5

Re: zeilenumbruch in text-file löschen

  Alt 21. Mär 2006, 12:25
Hi,

Ich würde die Datei in eine StringList laden und dann StringReplace benutzen:

Delphi-Quellcode:
Var Source: TStringList;
[...]
Source := TStringList.Create;
Source.LoadFromFile ('c:\datei.txt');
Source.Text := StringReplace (Source.Text, #13#10, '', [rfReplaceAll]);
Source.SaveToFile;
Wegen der Geschwindigkeit: Mache ähnliches mit Dateien bis 5 MB Größe und die Geschwindigkeit ist OK.


Gruß
Hollie
  Mit Zitat antworten Zitat