mirror of
https://github.com/danieleteti/delphimvcframework.git
synced 2024-11-16 08:15:53 +01:00
28 lines
313 B
ObjectPascal
28 lines
313 B
ObjectPascal
|
unit LoggerProConfig;
|
||
|
|
|
||
|
|
interface
|
||
|
|
|
||
|
|
uses
|
||
|
|
LoggerPro;
|
||
|
|
|
||
|
|
function Log: ILogWriter;
|
||
|
|
|
||
|
|
implementation
|
||
|
|
|
||
|
|
uses
|
||
|
|
LoggerPro.OutputDebugStringAppender;
|
||
|
|
|
||
|
|
var
|
||
|
|
_Log: ILogWriter;
|
||
|
|
|
||
|
|
function Log: ILogWriter;
|
||
|
|
begin
|
||
|
|
Result := _Log;
|
||
|
|
end;
|
||
|
|
|
||
|
|
initialization
|
||
|
|
|
||
|
|
_Log := BuildLogWriter([TLoggerProOutputDebugStringAppender.Create])
|
||
|
|
|
||
|
|
end.
|