TsgcWSPClient_MQTT › イベント › OnMQTTSubscribe

OnMQTTSubscribe イベント

Subscribe に応答して SUBACK を受信したときに発生します。トピックごとの理由コードと MQTT 5 の SubscribeProperties を公開します。

構文

property OnMQTTSubscribe: TsgcWSMQTTSubscribeEvent;
// TsgcWSMQTTSubscribeEvent = procedure(Connection: TsgcWSConnection; aPacketIdentifier: Word; aCodes: TsgcWSSUBACKS; SubscribeProperties: TsgcWSMQTTSUBACKProperties) of object

デフォルト値

—

解説

ブローカーが SUBSCRIBE リクエストに SUBACK で返答したとき発生します。ブローカーはリクエスト内の個々のトピックフィルターを受け入れ、部分的に受け入れ、または拒否できるため、イベントはフィルターごとにコードを配信します。パラメーター：

• aPacketIdentifier — 元の SUBSCRIBE の 16 ビットパケット ID。
• aCodes — トピックフィルターごとに1つのエントリを持つTsgcWSSUBACKS配列。値0x00/0x01/0x02は、サブスクリプションが付与された最大QoSで受け入れられたことを意味します。値0x80以上(MQTT 5では0x83、0x87、0x8F、0x91、0x97、0x9E、0xA1、0xA2も追加されます)は、フィルターが拒否されたことを示します。どのフィルターが成功したかを確認するには、各コードを検査してください。
• SubscribeProperties（MQTT 5）— ブローカーが返す ReasonString と UserProperties。

使用例

procedure TForm1.MQTTSubscribe(Connection: TsgcWSConnection;
  aPacketIdentifier: Word; aCodes: TsgcWSSUBACKS;
  SubscribeProperties: TsgcWSMQTTSUBACKProperties);
var
  i: Integer;
begin
  for i := 0 to Length(aCodes) - 1 do
    if aCodes[i] < $80 then
      Memo1.Lines.Add(Format('subscription %d accepted (QoS %d)',
        [i, aCodes[i]]))
    else
      Memo1.Lines.Add(Format('subscription %d rejected (code $%x)',
        [i, aCodes[i]]));
end;

イベントに戻る