成员函数 FreeMessage(PQMQTTMessage).
FreeMessage(PQMQTTMessage)
保护成员 procedure FreeMessage(AMsg: PQMQTTMessage);