🚀 go-pugleaf

hi...  I'm creating XMLDocuments dinamicaly, but I don't know how to delete
them. If I use:  delete XMLDocument;     the compiler throws an error.

Can someone helps me?

here is the code

void __fastcall TFMain::ServerSocket1ClientRead(TObject *Sender,
      TCustomWinSocket *Socket)
{
    AnsiString Texto, Evento, Room_id;
    TXMLDocument *XMLDocument;
    _di_IXMLDocument d;
    _di_IXMLNode Nodo;

    XMLDocument = new TXMLDocument("");

    try
    {
      Texto = Socket->ReceiveText();
      Memo1->Lines->Add(Texto);

      try
      {
        XMLDocument->GetInterface(d);
        d->LoadFromXML(WideString(Texto));

        Nodo = XMLDocument->DocumentElement->ChildNodes->GetNode(0);
        Evento = Nodo->Attributes[WideString("name")];
      }
      catch ( ... )
      {
..........
........

    XMLDocument->Active = false;      //I don't know if I need it
    //delete XMLDocument;                  //this trows an error
}