TsgcWSPClient_MQTT › Events › OnMQTTSubscribe

OnMQTTSubscribe 이벤트

Subscribe에 대한 응답으로 SUBACK이 수신될 때 발생하며, 토픽별 reason 코드와 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 — topic 필터당 하나의 항목이 있는 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;

이벤트로 돌아가기