log4pascal
1.0.0
Log4Pascalは、ObjectPascal(Delphi、Freepascal)向けのシンプルな伐採ユニットを作成することを目的としたオープンソースプロジェクトです。
Log4Pascalは、Apache Software FoundationのLog4Jパッケージに基づいていません。さて、名前だけです。
ユニットLog4Pascal.pasをプロジェクトに追加するだけです。
Project -> Add to Projectから、ファイルを見つけて選択します。ログファイルはユニットLog4Pascalで定義されているため、変更する場合は、次の行を変更します。
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]Lazarus(Free Pascal)を使用してIdentifier not found "DebugHook" 1つのエラーコンパイルモジュールがありました。
したがって、Free Pascalでlog4Pascalを使用する場合は、log4Pascalユニットにある次の行を削除(または置き換える)必要があります。
if DebugHook = 0 then Exit;このソフトウェアはオープンソースで、MITライセンス(MIT)の下でライセンスされています。詳細については、ライセンスを参照してください。