Einzelnen Beitrag anzeigen

Benutzerbild von himitsu
himitsu
Online

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

Re: Zeilenendezeichen?

  Alt 2. Jun 2010, 18: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).
Garbage Collector ... Delphianer erzeugen keinen Müll, also brauchen sie auch keinen Müllsucher.
my Delphi wish list : BugReports/FeatureRequests
  Mit Zitat antworten Zitat