TQMQTTMessage.EncodeInt64(PByte,UInt64) 函数

private
 procedure EncodeInt64(var ABuf: PByte; V: UInt64);