簡單的開源日志Log4D delphi 6—delphi xe 10全可用

一、前言

網上看Log4Cpp等使用很麻煩, 10秒內看不懂我就沒有耐心了。想起Delphi是最簡單的編程工具，于是就Log4Delphi啦！

二、下載安裝

1.下載 https://sourceforge.net/projects/log4delphi/files/

2. 安裝：加入lib查找路徑

下載后解壓到，打開源碼路徑： \log4delphi-0.8\src\delphi

發現控件包散發出濃郁的陳酒香, 最高只支持最經典的Delphi7（Delphi8開始就被產品經理帶歪了，居然使用.net做底層庫，就像把高貴的宮殿建立在松軟的垃圾堆上，默哀1分鐘…）。
還好，Delphi和C語言一樣上得廳堂性下得廚房，不必安裝控件包，有查找路徑，uses過來(像C的 #include)就行。如下圖添加2個路徑：
log4delphi-0.8\src\delphi\util
log4delphi-0.8\src\delphi

三、配置和使用

1. 加載配置和釋放內存

在工程文件(相當于C語言的main文件)的源碼中uses單元TConfiguratorUnit, TLoggerUnit
再在Application.Initialize;的后面調用doPropertiesConfiguration(‘log4delphi.properties’); 去讀取配置并初始化log4d。
最后Application結束后，釋放堆內存：
TLogger.freeInstances;

2. 編譯測試

如果你的工程不是基于VCL，而是FireMonkey的，編譯會有點小問題，需要修改如下：

在 TPropertyConfiguratorUnit.pas 和 TConfiguratorUnit中(1). 源碼中uses 了 Forms的地方，都要替換為FMX.Forms(2). 源碼中有ExtractFileDir(Application.ExeName)的地方，都要替換為GetCurrentDir()

幸好不多，只有3個地方。

3. 配置文件

將\log4delphi-0.8\example目錄下的log4delphi.properties放入應用程序同一目錄下。

4. 調用log4d

在需要Log的代碼頭部先
uses TLoggerUnit;
然后在你需要的地方寫Log信息
根據Level的類型，有五種優先級別的Log信息

TLogger.getInstance.debug('Debug message');TLogger.getInstance.info('Info message');TLogger.getInstance.warn('Warn message');TLogger.getInstance.error('Error message');TLogger.getInstance.fatal('Fatal message');

下圖是我的簡單測試

編譯運行后程序所在的目錄下有個app.log文件, 顯然記錄了剛才我點擊五類按鍵的情況。

四、實時查看Log

有時候需要實時查看Log記錄，怎么辦，Linux下的tail命令能很好地跟蹤，windows則只能移花接木啦！
windows下執行Linux命令需要下載一個工具cygwin或者git bash
下載后直接安裝并運行得到一個黑窗口：
用命令 cd 進入你app.log所在的目錄如d盤test/xxx目錄下：
cd d:/test/xxxxx
然后用tail命令實時跟蹤：
tail -f app.log

如上圖就可看到app.log不斷地實時變化

五、深入配置文件

前面的探索只是能簡單工作起來，高級用戶還需自己配置log4delphi.properties文件。
比如改默認的單個文件為多個文件，適用于大量日志記錄：

#log4delphi.appender.fileAppender=TFileAppender //只記錄單個日志文件 log4delphi.appender.fileAppender=TRollingFileAppender //一個不夠就生成多個文件保存, 單個文件的最大尺寸使用MaxFileSize設置,文件個數使用MaxBackupIndex設置。 log4delphi.appender.fileAppender.MaxBackupIndex=10 log4delphi.appender.fileAppender.MaxFileSize=2M log4delphi.appender.fileAppender.File=app.log //文件名稱 log4delphi.appender.fileAppender.AppDir=true //運行程序所在目錄 log4delphi.appender.fileAppender.Append=true //追加方式

對日志的輸出格式的設置，注釋掉默認的格式，放開自己的格式：

#log4delphi.appender.fileAppender.layout=TSimpleLayout //默認的簡單方式,日志文件中只寫入你輸出的內容如:log.debug('xxx'); 日志只記錄xxx log4delphi.appender.fileAppender.layout=TPatternLayout //自定義Pattern參數來設置日志輸出格式 log4delphi.appender.fileAppender.layout.Pattern=%d{yyyy-mm-dd hh:nn:ss:zzz} [%5p] [%L] [%e] %m%n

當然高級用戶還有不同優先級的log，探索吧，后浪！

總結

以上是生活随笔為你收集整理的简单的开源日志Log4D delphi 6---delphi xe 10全可用的全部內容，希望文章能夠幫你解決所遇到的問題。

如果覺得生活随笔網站內容還不錯，歡迎將生活随笔推薦給好友。