Schreiben in Textdatei

[Klose Marcus]

Ich will in meiner Aplikation die Fehlermeldungen in eine Textdatei schreiben. Wie geht man so etwas am einfachsten an und was für welche Einschränkungen gibt es (max. Anzahl Zeilen) ?
Wie kann man realisieren, das nur die letzten 100 Meldungen in der Datei stehen ?

[Mario.Noack]

Das Schreiben in eine Logdatei geht recht einfach mit Writeln. An der Sache mit der maximalen Zeilenzahl scheiden sich die Geister:<br>
http://www.entwickler-forum.de\webx?128@@.ee8d9b3<p>
Evlt. hilft Dir auch das weiter:<br>
http://www.entwickler-forum.de\webx?50@@.ee6e6f0<p>
Schöne Grüße, Mario Noac

[Agustin Angeles]

Hallo Marcus, <BR>
ich empfehle dir die Klasse <B>TEventLogger</B>. Damit kannst das Ereignisprotokoll von Windows benutzen. Eine Textdatei ist aber eine bessere Lösung wenn du Platformunabhängig programierst. <BR>

Ein Beispiel:
<PRE>
uses
SvcMgr;

procedure TForm1.Button1Click(Sender: TObject);
var Logger: TEventLogger;
begin
Logger := TEventLogger.Create('EventLoggerTest');
Logger.LogMessage('Hello World');
Logger.Free;
end;
</PRE>

saludos,
<BR>
Agustin Angele

[Klose Marcus]

Erst mal vielen Dank an alle.

Ich habe das ganze jetzt so gelöst:

Textdatei in ein TStrings eingelesen. Neue Meldung hinzugefügt. Anzahl der Meldungen überprüft und gegebenenfalls zuviele Meldungen gelöscht. TStrings zurück in Textdatei geschrieben