VERSION 1.2.0

LOGGERPRO-BUILD-TIMESTAMP.TXT

@@ -1 +1 @@
-13/06/2017 17.33.58 
+02/05/2018 12:40:17 

LoggerPro.FileAppender.pas

@@ -45,6 +45,7 @@   TLoggerProFileAppender = class(TLoggerProAppenderBase)
     FLogFormat: string;
     FFileAppenderOptions: TFileAppenderOptions;
     FLogsFolder: string;
+    FEncoding: TEncoding;
     function CreateWriter(const aFileName: string): TStreamWriter;
     procedure AddWriter(const aLogItem: TLogItem; var lWriter: TStreamWriter;
       var lLogFileName: string);
@@ -81,7 +82,7 @@   TLoggerProFileAppender = class(TLoggerProAppenderBase)
       : Integer = DEFAULT_MAX_BACKUP_FILE_COUNT;
       aMaxFileSizeInKiloByte: Integer = DEFAULT_MAX_FILE_SIZE_KB;
       aLogsFolder: string = ''; aFileAppenderOptions: TFileAppenderOptions = [];
-      aLogFormat: string = DEFAULT_LOG_FORMAT); reintroduce;
+      aLogFormat: string = DEFAULT_LOG_FORMAT; aEncoding: TEncoding = nil); reintroduce;
     procedure Setup; override;
     procedure TearDown; override;
     procedure WriteLog(const aLogItem: TLogItem); overload; override;
@@ -230,14 +231,19 @@ procedure TLoggerProFileAppender.AddWriter(const aLogItem: TLogItem;
 
 constructor TLoggerProFileAppender.Create(aMaxBackupFileCount: Integer;
   aMaxFileSizeInKiloByte: Integer; aLogsFolder: string;
-  aFileAppenderOptions: TFileAppenderOptions; aLogFormat: string);
+  aFileAppenderOptions: TFileAppenderOptions; aLogFormat: string;
+  aEncoding: TEncoding);
 begin
   inherited Create;
   FLogsFolder := aLogsFolder;
   FMaxBackupFileCount := aMaxBackupFileCount;
   FMaxFileSizeInKiloByte := aMaxFileSizeInKiloByte;
   FLogFormat := aLogFormat;
   FFileAppenderOptions := aFileAppenderOptions;
+  if Assigned(aEncoding) then
+    FEncoding := aEncoding
+  else
+    FEncoding := TEncoding.DEFAULT;
 end;
 
 function TLoggerProFileAppender.CreateWriter(const aFileName: string)
@@ -262,7 +268,7 @@ function TLoggerProFileAppender.CreateWriter(const aFileName: string)
       lFileStream := TFileStream.Create(aFileName, lFileAccessMode);
       try
         lFileStream.Seek(0, TSeekOrigin.soEnd);
-        Result := TStreamWriter.Create(lFileStream, TEncoding.Default, 32);
+        Result := TStreamWriter.Create(lFileStream, FEncoding, 32);
         Result.AutoFlush := True;
         Result.OwnStream;
         break;

README.md

@@ -98,13 +98,15 @@ The framework contains the following built-in log appenders
 - Console (`TLoggerProConsoleAppender`)
 - OutputDebugString (`TLoggerProOutputDebugStringAppender`)
 - VCL Memo (`TVCLMemoLogAppender`)
+- Redis Appender with LogsViewer(to aggregate logs from different instances on a single Redis instance)
+- Email Logger (to send email as log, very useful for fatal errors)
 
 Next appenders in the development pipeline
-- Redis Appender (to aggregate logs from different instances on a single Redis instance)
-- Email Logger (to send email as log, very useful for fatal errors)
 - RESTful Appender (to send logs to a rest endpoint using a specific request format, so that you can implement log server in DelphiMVCFramework, PHP, Java, Python, Node etc)
+- Twitter Appender (to send logs to a Twitter Account)
+- Database appender (to send logs to a database table using FireDAC components)
 
-The log writer and all the appenders are asycnhronous.
+The log writers and all the appenders are asycnhronous.
 
 **Check the samples to see how to use each appender or even combine different appenders.**
 

VERSION.TXT

@@ -1,2 +1,2 @@
-VERSION 1.1.2
-BUILD DATETIME 2017-06-13T17:33:58.934388
+VERSION 1.2.0
+BUILD DATETIME 2018-05-02T12:40:16.984208

dodo.py

@@ -88,7 +88,7 @@ def task_build():
 						"echo %%date%% %%time:~0,8%% > LOGGERPRO-BUILD-TIMESTAMP.TXT",            
 						buildProjects,
 						build_unit_tests,
-						"unittests\\Win32\\Release\\UnitTests.exe -exit:Continue"],
+						"unittests\\Win32\\PLAINDUNITX\\UnitTests.exe -exit:Continue"],
 	'params':[{'name':'version',
 	           'short':'v',
 	           'long':'version',
@@ -103,7 +103,7 @@ def task_unittests():
     return {
         'actions': [
 					build_unit_tests,
-					"unittests\\Win32\\Release\\UnitTests.exe -exit:Continue"
+					"unittests\\Win32\\PLAINDUNITX\\UnitTests.exe -exit:Continue"
 					],
 				'params':[{'name':'version',
 					'short':'v',