TOnSyslogEvent = procedure (Sender: TObject; ASysLogMessage: TIdSysLogMessage; ABinding: TIdSocketHandle) of object;