Victor,

If TXmlDocument( cString, HBXML_STYLE_NOESCAPE ) is a valid call, yet does not produce a correct object (given that I probably haven't seen the code), then can't TXmlDocument(...) check that :New is in the calling tree and produce a decent error? (Sorry if I'm stating or overlooked the obvious)

Paul

----- Original Message ----- From: "Viktor Szakáts" <harbour...@syenar.hu>
To: "Harbour Project Main Developer List." <harbour@harbour-project.org>
Sent: Wednesday, April 28, 2010 1:58 PM
Subject: Re: [Harbour] Error BASE/1099 Argument error: STR


Hi,

////////////////////////////////////////////////////
//   xml1.prg
////////////////////////////////////////////////////

#include "/home/ivan/src/harbour/contrib/xhb/hbxml.ch"

Rather use -i option or point to xhb.hbc file.
(or simply copy your sample to contrib/xhb/tests/ dir
and issue hbmk2 from there)

function main()
   local cFile:="./test.xml", cString
   local cNote, cDiscount
   local oDoc, oBook, oIterator, oCurrent

   cString:=memoread( cFile )
   if !( len(cString) > 0 )
      wait "xml file unavailable"
      return NIL
   endif
   oDoc:=TXmlDocument( cString, HBXML_STYLE_NOESCAPE )

You need to replace 'TXmlDocument(' with 'TXmlDocument:New('

Viktor

_______________________________________________
Harbour mailing list (attachment size limit: 40KB)
Harbour@harbour-project.org
http://lists.harbour-project.org/mailman/listinfo/harbour


_______________________________________________
Harbour mailing list (attachment size limit: 40KB)
Harbour@harbour-project.org
http://lists.harbour-project.org/mailman/listinfo/harbour

Reply via email to