kbmmw 自從4.8.2 版本里增長了日誌管理之後,隨着版本升級,增長了不少功能,使用方法也有所改變。服務器
功能也愈來愈強大。測試
今天說一下 kbmmw5 裏面的日誌備份,順便演示一下新的使用方法。spa
咱們要使用kbmmw 的日誌管理,首先要引用kbmMWLog 單元,引用這個單元后,默認開啓一個debug
日誌對象 log。通常咱們在程序開始時就要記錄一些信息。所以把它放到 初始化裏面。咱們要使用日誌文件,日誌
首先定義一個文件日誌管理器。code
var filelogmgr:TkbmMWLocalFileLogManager; //文件日誌
而後咱們在主單元裏面添加日誌設置代碼對象
initialization filelogmgr:=TkbmMWLocalFileLogManager.Create('.\logs\log.txt'); // ,一個是日誌文件 filelogmgr.FileOptions:=[mwlfoBackup,mwlfoTimestampBackup]; //備份日誌,而且備份文件用時間戳命名 //[mwlfoDeleteOldLog];//:=true; // 刪除老的日誌文件 filelogmgr.MaxLogFileSize:=1024; //文件大小以KB 爲單位 filelogmgr.FlushInterval:=0; // 寫文件時間間隔,0 爲當即寫文件 Log.LogManager:=filelogmgr; // log.Info('日誌開始');
經過上面的設置,咱們就實現了日誌文件備份。若是日誌文件大於1M,就備份,這樣方便之後打開分析。blog
咱們在咱們的服務器代碼裏面就能夠根據實際狀況作日誌記錄string
function TkbmMWCustomHTTPSmartService1.HelloWorld:string; var hlp:TkbmMWRESTTransportStreamHelper; m:string; begin hlp:=TkbmMWRESTTransportStreamHelper(RequestTransportStream.Helper); m:=hlp.Operation; log.info(m+' '+ hlp.URL ); Result:='{"result":"Hello world", "from":"'+RequestTransportStream.RemoteLocation+'", "method":"'+m +'",'+ '"maxinstant":'+TkbmMWServiceDefinition(self.ServiceDefinition).MaxCount.ToString +','+ '"mininstant":'+TkbmMWServiceDefinition(self.ServiceDefinition).MinCount.ToString +' }'; log.debug('result:='+result); end;
咱們運行服務器,使用AB 測試it
而後咱們再看生成的日誌
打開日誌目錄,咱們能夠看到按照1M的大小,生成了日誌備份文件。
打完收功。