🚀 go-pugleaf

What type of smart pointers? classes created by you or using auto_ptr?
I think I never used smart pointers...

So... should I use this code (for example):
//---------------------------------------------------------------------------------------------
AnsiString TInternetExplorer::CodigoFuenteRealLive(TCppWebBrowser* 
MyCppWebBrowser)
{
  AnsiString Source = "";
  if( MyCppWebBrowser->Document )
  {
    TComInterface<IHTMLDocument2> Doc;
    MyCppWebBrowser->Document->QueryInterface(IID_IHTMLDocument2, 
(LPVOID*)&Doc);
    if( Doc )
    {
           TComInterface<IHTMLElementCollection> All;
           Doc->get_all(&All);
           if( All )
           {
                TVariant ItemName(L"TimeLeft", false);
                TVariant ItemIndex = 0;
                TComInterface<IDispatch> Disp;
                All->item(ItemName, ItemIndex, &Disp);
                if( Disp )
                {
                     TComInterface<IHTMLElement> Element;
                     Disp->QueryInterface(IID_IHTMLElement,(LPVOID*)&Element);
                     if( Element )
                     {
                         WideString text;
                         Element->get_innerText(&text);
                         Source = text;
                     }
                }
           }
    }
  }
 return Source;
}
//----------------------------------------------------------------------

or this instead?
(changes marked with /** new **/
//---------------------------------------------------------------------------------------------
AnsiString TInternetExplorer::CodigoFuenteRealLive(TCppWebBrowser* 
MyCppWebBrowser)
{
  AnsiString Source = "";
  if( MyCppWebBrowser->Document )
  {
    TComInterface<IHTMLDocument2> Doc;
    MyCppWebBrowser->Document->QueryInterface(IID_IHTMLDocument2, 
(LPVOID*)&Doc);
    if( Doc )
    {
           TComInterface<IHTMLElementCollection> All;
           Doc->get_all(&All);
           Doc->Release();    /** new **/
           if( All )
           {
                TVariant ItemName(L"TimeLeft", false);
                TVariant ItemIndex = 0;
                TComInterface<IDispatch> Disp;
                All->item(ItemName, ItemIndex, &Disp);
                if( Disp )
                {
                     TComInterface<IHTMLElement> Element;
                     Disp->QueryInterface(IID_IHTMLElement,(LPVOID*)&Element);
                     Disp->Release();    /** new **/
                     if( Element )
                     {
                         WideString text;
                         Element->get_innerText(&text);
                         Source = text;
                         Element->Release();    /** new **/
                     }
                }
           }
    }
  }
 return Source;
}
//----------------------------------------------------------------------

enrique.