loggerpro
1.4.1
Uma estrutura de log moderna e conectável para Delphi
LoggerPro é compatível com
ILogItemRenderers (verifique amostras) System.Net.HttpClient )TLoggerProFileAppender (Obrigado, charoit) TThreadedList<T> por uma implementação personalizada ( TThreadSafeQueue<T> ) devido a um bug e isso em TMonitor .TThreadSafeQueue<T> não é um substituto imediato para TThreadedQueue<T> mas pode ser usado em outros projetos se você estiver enfrentando o mesmo bug.TVCLMemoLogAppender.Create obtém um novo parâmetro: aClearOnStartup que opcionalmente limpa o memorando na inicialização.TLoggerProConsoleAppender (graças a Fulgan)TLoggerProFileAppender ; agora há um retorno de chamada OnLogRow que pode ser usado para personalizar o formato da linha de log.Log sobrecarregados. As versões *Fmt estão obsoletas e serão removidas em uma versão futura. PROBLEMA #17RESTLogCollector program getting_started_console;
{ $APPTYPE CONSOLE }
uses
System.SysUtils,
LoggerPro.GlobalLogger; // this is the global logger, it is perfect to understand the basic operation of LoggerPro.
begin
try
// the global logger uses a TLoggerProFileAppender, so your logs will be written on a
// set of files with automatic rolling/rotating
Log.Debug( ' Debug message ' , ' main ' ); // TLoggerProFileAppender uses the "tag" to select a different log file
Log.Info( ' Info message ' , ' main ' );
Log.Warn( ' Warning message ' , ' main ' );
Log.Error( ' Error message ' , ' errors ' );
WriteLn( ' Check "getting_started_console.00.main.log" and "getting_started_console.00.errors.log" to see your logs ' );
ReadLn;
except
on E: Exception do
Writeln(E.ClassName, ' : ' , E.Message);
end ;
end .A abordagem mais flexível/correta não é muito complicada do que a abordagem do registrador global. Veja como é simples criar uma instância customizada do logwriter
program getting_started_console_appenders;
{ $APPTYPE CONSOLE }
uses
System.SysUtils,
LoggerPro, // LoggerPro core
LoggerPro.FileAppender, // File appender
LoggerPro.OutputDebugStringAppender; // OutputDebugString appender
var
Log: ILogWriter;
begin
Log := BuildLogWriter([TLoggerProFileAppender.Create,
TLoggerProOutputDebugStringAppender.Create]);
try
Log.Debug( ' Debug message ' , ' main ' );
Log.Info( ' Info message ' , ' main ' );
Log.Warn( ' Warning message ' , ' main ' );
Log.Error( ' Error message ' , ' errors ' );
WriteLn( ' Check ' );
WriteLn( ' "getting_started_console.00.main.log" ' );
WriteLn( ' "getting_started_console.00.errors.log" ' );
if DebugHook <> 0 then // inform the user where his/her logs are
begin
WriteLn( ' also, you logs have been sent to the current debugger, check the Delphi '' s EventLog window to see them. ' );
end
else
begin
WriteLn( ' ..seems that no debugger is present. The logs can be seen using DebugView. ' );
WriteLn( ' Download it from here https://technet.microsoft.com/en-us/sysinternals/debugview.aspx ' );
WriteLn( ' Learn how to use http://tedgustaf.com/blog/2011/5/use-debugview-to-view-debug-output-from-asp-net-web-application/ ' );
end ;
ReadLn;
except
on E: Exception do
WriteLn(E.ClassName, ' : ' , E.Message);
end ;
end .A estrutura contém os seguintes anexadores de log integrados
TLoggerProFileAppender ) (v1.0.0+)TLoggerProConsoleAppender ) (v1.0.0+)TLoggerProOutputDebugStringAppender ) (v1.0.0+)TVCLMemoLogAppender ) (v1.0.0+)TVCLMemoLogAppender ) - graças a https://github.com/he3p94uu (v1.3.0+)Próximos anexadores no pipeline de desenvolvimento
Os gravadores de log e todos os anexadores são assíncronos.
Verifique os exemplos para ver como usar cada anexador ou até mesmo combinar diferentes anexadores.
A documentação está disponível na pasta docs como HTML.
Você pode instalar o gerenciador de pacotes Delphinus e instalar o LoggerPro como um pacote lá. (Delphinus-Suporte)
