log4pascal
1.0.0
Log4Pascal เป็นโครงการโอเพ่นซอร์สที่มีจุดมุ่งหมายเพื่อสร้างหน่วยบันทึกอย่างง่ายสำหรับ ObjectPascal (Delphi, FreePascal)
Log4Pascal ไม่ได้ขึ้นอยู่กับแพ็คเกจ log4j จาก Apache Software Foundation แค่ชื่อ
เพียงเพิ่มหน่วย 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 (Pascal ฟรี) มี 1 ข้อผิดพลาดในการรวบรวมโมดูล: Identifier not found "DebugHook"
ดังนั้นหากคุณต้องการใช้ log4pascal ใน Pascal ฟรีคุณต้องลบ (หรือแทนที่) บรรทัดต่อไปนี้ที่พบในหน่วย log4pascal:
if DebugHook = 0 then Exit;ซอฟต์แวร์นี้เป็นโอเพ่นซอร์สที่ได้รับอนุญาตภายใต้ใบอนุญาต MIT (MIT) ดูใบอนุญาตสำหรับรายละเอียด