TsgcWSPClient_MQTT › イベント › OnMQTTConnect

OnMQTTConnect イベント

CONNACK を受信した後に発生します。Session フラグ、ReasonCode、MQTT 5 の ConnectProperties を報告します。

構文

property OnMQTTConnect: TsgcWSMQTTConnectEvent;
// TsgcWSMQTTConnectEvent = procedure(Connection: TsgcWSConnection; const Session: Boolean; const ReasonCode: Integer; const ReasonName: String; const ConnectProperties: TsgcWSMQTTCONNACKProperties) of object

デフォルト値

—

解説

ブローカーが CONNACK で CONNECT を確認応答したときに発生します。これが MQTT セッションが完全に使用可能になる最初の瞬間です。このハンドラー内から Subscribe / Publish を呼び出しても安全です。パラメータ:

• Session — ブローカー側のセッション状態。CleanSession = True の場合、ブローカーは Session = False で応答しなければなりません。CleanSession = False の場合、Session = True はこの ClientIdentifier に対してブローカーが保存済み状態を持っていたことを意味し、Session = False は保存済み状態がなかったことを意味します。
• ReasonCode（MQTT 5）— 数値の CONNACK 理由（0 = 成功）。
• ReasonName（MQTT 5）— ReasonCode の人間が読める説明。
• ConnectProperties（MQTT 5）— ブローカーのケーパビリティとネゴシエートされた制限: SessionExpiryInterval、ReceiveMaximum、MaximumQoS、RetainAvailable、MaximumPacketSize、AssignedClientIdentifier、TopicAliasMaximum、ReasonString、UserProperties、WildcardSubscriptionAvailable、SubscriptionIdentifiersAvailable、SharedSubscriptionAvailable、ResponseInformation、ServerReference、AuthenticationMethod、AuthenticationData。

使用例

procedure TForm1.MQTTConnect(Connection: TsgcWSConnection;
  const Session: Boolean; const ReasonCode: Integer;
  const ReasonName: String;
  const ConnectProperties: TsgcWSMQTTCONNACKProperties);
begin
  if ReasonCode <> 0 then
  begin
    Memo1.Lines.Add('Connect rejected: ' + ReasonName);
    Exit;
  end;

  Memo1.Lines.Add(Format('Connected. Session=%s MaxQoS=%d',
    [BoolToStr(Session, True), ConnectProperties.MaximumQoS]));

  // now it is safe to subscribe and publish
  MQTT.Subscribe('sensors/#', mtqsAtLeastOnce);
end;

イベントに戻る