我正在使用带有 Ably .NET 实时库版本 1.2.1 的 VB.NET。我有一个包装类设置和管理 Ably。该类实现 ILoggerSink。它正在设置频道,如来自班级不同部分的这些片段所示:
Public Class Ably
Implements IDisposable, ILoggerSink
.
.
Private WithEvents mChannel As IRealtimeChannel
Private Delegate Sub ReceiveMessageDelegate(ByVal m As Message)
Private Delegate Sub PublishCallbackDelegate(ByVal result As Boolean, ByVal einfo As ErrorInfo)
Private mPublishCallbackDelegate As PublishCallbackDelegate = AddressOf PublishCallback
Private mReceiveMessageDelegate As ReceiveMessageDelegate = AddressOf ReceiveMessage
.
.
Dim opt = New ClientOptions(Main.AblyConnectionKey) With {.EchoMessages = False, .LogLevel = LogLevel.Debug}
Dim art = New AblyRealtime(opt)
mChannel = art.Channels.Get(idstr)
mChannel.Subscribe(Sub(m) mReceiveMessageDelegate(m))
.
.
mChannel.Publish(mname, mdata, Sub(m, n) mPublishCallbackDelegate(m, n))
接口方法从这个定义开始:
Public Sub LogEvent(level As LogLevel, message As String) Implements ILoggerSink.LogEvent
'The rest of the sub here.
由此类管理的所有其他 Ably 事物都可以工作 - 附加到通道、发布消息和接收消息。该类获取 mChannel.StateChanged 和 mChannel.[Error] 事件。
LogEvent 方法永远不会被调用。我错过了什么?谢谢。
更新:接受的答案有效,这是我在任何文档中都错过的一件简单的事情。这是更正后的代码行:
Dim opt = New ClientOptions(Main.AblyConnectionKey) With {.EchoMessages = False, .LogLevel = LogLevel.Debug, .LogHander = Me}
同样值得注意的是这个类是一个单例。