For this and that reasons. I modified the library jMQTTBroker v2 and added raising onConnect and onDisconnect events for broker interceptor. Broker example is from Erel's this code. Library source code is attached.
www.b4x.com
I want to know:
Is this a replacement of jMqttBroker v1.04 and v2.02?
Does this mean I no longer need to add an MqttClient to get the events like Connected, Disconnected, MessageArrived?
Is this library still work if use together with MqttClient library?
Which version of MqttClient library is supported for B4A and B4J? version 1.26?
For this and that reasons. I modified the library jMQTTBroker v2 and added raising onConnect and onDisconnect events for broker interceptor. Broker example is from Erel's this code. Library source code is attached.
www.b4x.com
I want to know:
Is this a replacement of jMqttBroker v1.04 and v2.02?
Does this mean I no longer need to add an MqttClient to get the events like Connected, Disconnected, MessageArrived?
Is this library still work if use together with MqttClient library?
Which version of MqttClient library is supported for B4A and B4J? version 1.26?
For this and that reasons. I modified the library jMQTTBroker v2 and added raising onConnect and onDisconnect events for broker interceptor. Broker example is from Erel's this code. Library source code is attached.
www.b4x.com
I want to know:
Is this a replacement of jMqttBroker v1.04 and v2.02?
Does this mean I no longer need to add an MqttClient to get the events like Connected, Disconnected, MessageArrived?
Is this library still work if use together with MqttClient library?
Which version of MqttClient library is supported for B4A and B4J? version 1.26?
Dim server As JavaObject = Broker.As(JavaObject).GetField("server")
Dim pck As String = GetType(Me) & "$MyHandler"
Dim handler As JavaObject handler.InitializeNewInstance(pck, Array(Me))
Dim handlers As List = Array(handler) server.RunMethod("startServer", Array(Broker.As(JavaObject).GetField("config"), handlers))
Broker.Initialize("broker", 51042)
Broker.Start
Dim server As JavaObject = Broker.As(JavaObject).GetField("server")
Dim pck As String = GetType(Me) & "$MyHandler"
Dim handler As JavaObject
handler.InitializeNewInstance(pck, Array(Me))
server.RunMethod("addInterceptHandler", Array(handler))