|
(Co-Admin)
Registriert seit: 29. Mai 2002
Ort: Hamburg
11.105 Beiträge
Delphi 11 Alexandria
|
Re: Stringlist.SaveToFile
12. Dez 2003, 12:06
Moin Tonic,
ich denke mal, dass das Problem nicht die Leerzeile, sondern das #13 Zeichen ist.
Soweit ich weiss, wird unter UNIX nur #10 als Zeilenende genutzt, Du müsstest also sämtliche #13#10 in der Datei durch #10 ersetzen.
Beim Einlesen in eine TStringList entfällt das Problem, da LoadFromFile aus #10 automatisch #13#10 macht.
Am einfachsten dürfte das gehen, indem Du TStringList.Text in eine Stringvariable überträgst, in dieser, z.B. mit StringReplace, die #13#10 Kombinationen durch #10 ersetzt, und die Variable dann, z.B. mittels TFileStream, als Datei wegspeicherst.
Ob StringReplace geeignet ist hängt allerdings auch von der Datenmenge ab.
Tschüss Chris
Die drei Feinde des Programmierers: Sonne, Frischluft und dieses unerträgliche Gebrüll der Vögel.
Der Klügere gibt solange nach bis er der Dumme ist
|