Zeilen in delphi

[himitsu]

OK, 200 Zeilen ist NICHTS,
aber TStringList für ein großes Log, da würdest du dir keine Freude/Freunde mit machen. @Dolly


Am Einfachsten ist natürlich eine Prüfung auf die Dateigröße, anstatt der Zeilenanzahl.

Für die Zeilen mußt du dir entweder merken wieviele Zeilen drin sind,
oder du mußt die Datei öffnen und die Zeilen zählen,
also erstmal den Inhalt einlesen:
* Zeilen einlesen und mitzählen (ReadLn, TStringList.Count, Length(TFile.ReadAllLines), ...)
* oder als ein String/Stream und die Zeilenumbrüche zählen (z.B. Anzahl des Zeichens #10)

TFile
AppendAllText
AppendText + Write
OpenText + Read
ReadAllText
ReadAllLines
...

[Jumpy]

Damit die Zahl der Logs nicht unendlich wächst, wäre vielleicht ein rollierendes Log auch ein weiter Schritt. Wenn du die Anwendung so kinfigurierst, dass Sie maximal X Logdateien verwaltet, dann fängst du wenn Datei X voll ist wieder an in Datei 1 zu schreiben.