AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Zurück Delphi-PRAXiS Programmierung allgemein Programmieren allgemein Zeilenanzahl bei name.log Datei begrenzen
Thema durchsuchen
Ansicht
Themen-Optionen

Zeilenanzahl bei name.log Datei begrenzen

Ein Thema von aaaaaaaaaa_10 · begonnen am 17. Jul 2009 · letzter Beitrag vom 22. Jul 2009
 
pertzschc

Registriert seit: 29. Jul 2005
Ort: Leipzig
318 Beiträge
 
Delphi 12 Athens
 
#25

Re: Zeilenanzahl bei name.log Datei begrenzen

  Alt 20. Jul 2009, 14:16
Delphi-Quellcode:
procedure TLogFile.AddLine(Line: string);
var
  LogFileList : TStringList;
  Zeile: String;
begin
  LogFileList := TStringList.Create;
  try
    LogFileList.LoadFromFile(FFileName);
    // hier eine while-schleife, solange LogFileList.Count > 999
    // innerhalb der schleife immer LogFileList.Delete(0); damit wird oberstes zeile gelöscht.
    // danach hat das file im speicher 999 zeilen und die 1000. zeile kann hinzugefügt werden
    Zeile := FormatDateTime('c.zzz - ', Now)+Line;
    LogFileList.Append(Zeile);
    LogFileList.SaveToFile(FFileName);
  finally
    LogFileList.Free;
  end;
end;
  Mit Zitat antworten Zitat
 


Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 16:01 Uhr.
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz