delphimvcframework/samples/100_udp_syslog/LoggerProConfig.pas
Daniele Teti 55500acdf9 Squashed 'lib/loggerpro/' content from commit d1e0db6e
git-subtree-dir: lib/loggerpro
git-subtree-split: d1e0db6e93724e5fd825f0a8c02151d60450f98f
2023-02-27 12:26:25 +01:00

31 lines
411 B
ObjectPascal

unit LoggerProConfig;
interface
uses
LoggerPro, LoggerPro.UDPSyslogAppender;
var
Log: ILogWriter;
Appender: TLoggerProUDPSyslogAppender;
implementation
initialization
Appender := TLoggerProUDPSyslogAppender.Create(
'127.0.0.1'
, 5114 //UDPClientPort.Value
, 'COMPUTER'
, 'USER'
, 'EXE'
, '0.0.1'
, ''
, True
, False
);
Log := BuildLogWriter([Appender]);
end.