🚀 go-pugleaf

"nikhil" <nikhilbatooni@yahoo.com> wrote in message
news:42774efe$1@newsgroups.borland.com...

>
Status=MyBrowser->Document->QueryInterface(IID_IHTMLDocument2,(LPVOID*)&HTML
Document);

You are not checking to make sure that the Document is actually valid before
trying to access it.

>                 Opt.vt=VT_BSTR; Opt.bstrVal=WideString(SName); //SName is
the generated file name with .txt extension

You are assigning a temporary WideString to the VARIANT.  As soon as that
statement exists, the WideString is freed immediately, leaving the VARIANT
holding on to an invalid BSTR pointer.  You need to keep the WideString in
scope until you are finished using the VARIANT.  Otherwise, don't use a
WideString at all.  Either call SysAllocString() directly and then call
SysFreeString() when you are done with the VARIANT.  Or better yet, don't
use VARIANT at all, but use the VCL's Variant or TVariant class instead.

>                  VARIANT_BOOL __RPC_FAR RetVal;

Get rid of the __RPC_FAR, it has no effect in Win32 programming.

>                 XmlDoc=new TXMLDocument(TName);

Do not do that.  TXMLDocument does not work properly when instantiated
dynamically.  Use the IXMLDocument interface directly, ie:

    _di_IXMLDocument XmlDoc;

    XmlDoc = LoadXMLDocument(TName);
    //...

>                 XmlDoc->Options<<doNodeAutoCreate;
>                 XmlDoc->Options<<doAttrNull;
>                 XmlDoc->Options<<doAutoPrefix;
>                 XmlDoc->Options<<doNamespaceDecl;

You cannot assign Set-based properties like that.  You need to use the '='
operator as well, ie:

    XmlDoc->Options = XmlDoc->Options << doNodeAutoCreate << doAttrNull <<
doAutoPrefix << doNamespaceDecl;

>                 TagName=XmlDoc->DocumentElement->GetNodeName();

You are not checking to make sure that the DocumentElement is actually valid
before trying to access it.


Gambit