Log4Pascal ist ein Open -Source -Projekt, das darauf abzielt, eine einfache Protokollierungseinheit für ObjectPascal (Delphi, Freepascal) zu erstellen.
Log4Pascal basiert nicht auf dem Log4J -Paket der Apache Software Foundation. Nun, nur der Name.
Fügen Sie einfach die Einheit Log4Pascal.pas zum Projekt hinzu.
Project -> Add to Project und dann die Datei suchen und auswählen.Die Protokolldatei ist im Einheit log4pascal definiert. Wenn Sie also ändern möchten, ändern Sie die folgende Zeile:
initialization
Logger := TLogger.Create( ' Log.txt ' );SetQuietMode();SetNoisyMode();EnableTraceLog(); EnableDebugLog(); EnableInfoLog(); EnableWarningLog(); EnableErrorLog(); EnableFatalLog();DisableTraceLog(); DisableDebugLog(); DisableInfoLog(); DisableWarningLog(); DisableErrorLog(); DisableFatalLog();Clear(); Logger.Trace( ' Trace message log ' );
Logger.Debug( ' Message is logged only when in debug ' );
Logger.Info( ' Normal message log ' );
Logger.Warning( ' Warning message log ' );
Logger.Error( ' Error message log ' );
Logger.Fatal( ' Fatal message log ' );TRACE Trace message log [DATETIME HERE]
DEBUG Message is logged only when in debug [DATETIME HERE]
INFO Normal message log [DATETIME HERE]
WARN Warning message log [DATETIME HERE]
ERROR Error message log [DATETIME HERE]
FATAL Fatal message log [DATETIME HERE] Unter Verwendung von Lazarus (Free Pascal) gab es 1 Fehler, die das Modul zum Kompilieren von Fehlern gab: Identifier not found "DebugHook"
Wenn Sie also das log4pascal in Free Pascal verwenden möchten, müssen Sie die folgende Zeile löschen (oder ersetzen), die in log4pascal -Einheiten gefunden wurde:
if DebugHook = 0 then Exit;Diese Software ist Open Source, lizenziert unter der MIT -Lizenz (MIT). Weitere Informationen finden Sie in Lizenz.