TQMQTTMessage.EncodeInt(PByte,Cardinal) 函数

private
 procedure EncodeInt(var ABuf: PByte; V: Cardinal);