Delphi可以使用一些开源的第三方包来写日志。今天跟大家一起看看Delphi使用log4d库来写日志。

准备

需要提前下载好log4d库文件。log4d很简单，就一个pas文件。然后可以直接放到当前项目目录下。

配置文件

和使用log4j一样，log4d使用前也需要配置好log4d。按照约定，配置一般在log4d.properties文件中。以下是一个案例，日志文件名根据自己的实际情形修改。

log4d.rootLogger=INFO,file

log4d.appender.file=TLogFileAppender
log4d.appender.file.append=true
log4d.appender.file.fileName=wps_app.log
log4d.appender.file.errorHandler=TLogOnlyOnceErrorHandler
log4d.appender.file.layout=TLogPatternLayout
log4d.appender.file.layout.dateFormat=yyyy.mm.dd hh:nn:ss.zzz
log4d.appender.file.layout.pattern=[%d] - [%-5p] - [%c] - %m%n

Delphi中调用log4d

需要引用Log4D单元，初始化之后就可以调用常用的日志函数，比如Info，Error，Debug等等。

uses
  Log4D;

TLogPropertyConfigurator.Configure('log4d.properties');
// create a named logger
Logger := TLogLogger.GetLogger('WPS_APP');
// 调用日志方法
Logger.Info('%s', ['Hello world']);