Zeilenende richtig erkennen (CRLF, LF, CR)

[af0815]

Hallo,
ich habe hier Textdateien (CSV ähnlich), die immer wieder anderes Zeilenende haben. Einmal ist es Windows(CRLF) dann wieder Linux(LF). Gibt es in der LCL (FCL) eine Erkennung für die Zeilenenden ? Oder wie macht ihr das, wenn ihr den Text dann parsen müsst und euch auf die Zeilenenden einstellen müsst ?

[theo]

Von welchem Szenario sprichst du?
Einer TStringList ist das herzlich egal, was da kommt.

[sstvmaster]

Vielleicht kann EOLn da helfen?
- https://www.freepascal.org/docs-html/rt ... /eoln.html

Nachtrag, SeekEOLn:
-https://lazarus-ccr.sourceforge.io/docs ... keoln.html

[Winni]

Hi!

Warum nicht auf Theo hören:

Der Stringlist ist egal, ob da CRLF, CR oder LF steht. Die ist schlau.

D.h. ich kann auch eine Datei mit LF unter Windows einlesen.
Oder eine Datei mit CRLF unter Linux.

Sehr angenehm.

Readln aus Textdatei besitzt das gleiche schlaue Verhalten.

Winni

[af0815]

Warum nicht auf Theo hören:
Der Stringlist ist egal, ob da CRLF, CR oder LF steht. Die ist schlau.

Was machst du, wenn du keine Stringlist verwendest, sondern Zeile für Zeile liest. So und wie komme ich jetzt von Zeile zu Zeile ?

Der Klassiker ist, nach CR und LF zu suchen. Finde ich einen der beiden, muss ich mir das letzte und das nächste Zeichen ansehen. Damit kann ich dann ganz klassisch mir erarbeiten ob eine CRLF, LF oder CR vorhanden ist (oder ein krankes LFCR, wie ich es selbst mal produziert habe )

[Winni]

Hi af0815!

Hatte ich doch geschrieben:

readln (aTextFile, aString);

ist genauso schlau.
Liest alle Zeichen bis irgendein geartetes Zeilenende kommt.
Egal ob Dos, Linux oder Mac.
Verschluckt das Zeilenende und der File-Pointer steht auf dem ersten Zeichen der nächsten Zeile.

Die Gedanken hab ich mir bei meinen ersten Schritten mit fpc auch gemacht - damals noch im Dual-Boot mit Win und Lin. Und ich war angenehm überrascht.

Winni

[theo]

Was machst du, wenn du keine Stringlist verwendest, sondern Zeile für Zeile liest. So und wie komme ich jetzt von Zeile zu Zeile ?

Deshalb habe ich nach dem Szenario gefragt.
Mit TStringList und offenbar mit ReadLn ist es nämlich kein Problem.
Ich nehme jetzt an, du beziehst dich auf deine "utextfilestream.pas" viewtopic.php?p=129335#p129335

Sag das doch einfach, dann braucht man nicht rumeiern.
Ich glaube, das musst du wohl "von Hand" (aka zu Fuss) lösen, wenn du es so machen willst.

[af0815]

Auf die utextfilestream habe ich nicht gedacht, manche Sachen verwendet man so oft, das man sie vergisst, das die nicht aus Lazarus sind.

Ich glaube, das musst du wohl "von Hand" (aka zu Fuss) lösen, wenn du es so machen willst.

Wird auch in der Class Function TStrings.GetNextLine so 'zu Fuß' gelöst, also in der Elternklasse von der TStringList, werde mal die Komponente utextfilestream bearbeiten dürfen.