Einzelnen Beitrag anzeigen

Benutzerbild von himitsu
himitsu

Registriert seit: 11. Okt 2003
Ort: Elbflorenz
44.063 Beiträge
 
Delphi 12 Athens
 
#9

Re: Zeilenendezeichen?

  Alt 2. Jun 2010, 19:20
Mit der PartialTextfile könnte man die Datei auch stückchenweise einlesen und hätte diese Stückchen dann in einer kleinen TStringList innerhalb der Klasse.
Aber diese Klasse war eigentlich mehr zum Editieren gedacht und auch nicht unbedingt sehr ausgereift/optimiert.

Die TFileStringList ist, wie gesagt noch nicht ganz fertig,
aber den Parser (hatte ich auf der Stringlist rausgenommen, da er langsam zu groß wurde) wäre schon verwendbar.
dieser wäre praktisch sowas wie das AppendFile+Reset+ReadLn, nur daß er ein paar Dinge mehr kann.
www.delphipraxis.net/topic177785.html

einfaches zeilenweises Auslesen ginge z.B. so:
Delphi-Quellcode:
F := TTextStream.Create('Datei.txt', saRead);
Try
  While F.ReadLine do Begin
    S := F.ReadLn;
    ShowMessage(Format('%d. Zeile = "%s"', [F.Processed, S]));
  End;
Finally
  F.Free;
End;
Und es werden natürlich alle Zeilenumbrüche erkannt #13#10 (Windows), #10 (Unix/Linux) und #13 (Macintosh).
Neuste Erkenntnis:
Seit Pos einen dritten Parameter hat,
wird PoSex im Delphi viel seltener praktiziert.
  Mit Zitat antworten Zitat