Club Builder

[dodongoxp]

holas...

pues este es un truco para poder usar el TXMLDocument en una clase sin form... o para crearlo dinamicamente en runtime

como podran saber esta clase solo se puede usar hechando el componente en una forma.. ya que no puede funcionar sin un owner ni tampoco sin unos parametros iniciales.. asi que esta es una forma de hacerlo correr sin un form .. con este truquillo

para usarlo en runtime :


tienes que usar la interface delphi de TXMLDocument que es _di_IXMLDocument en su lugar de esta manera

_di_IXMLDocument xmldoc = LoadXMLDocument("c:\\archivovalido.xml");
xmldoc->Active = true;

o en su defecto


_di_IXMLDocument xmldoc = LoadXMLData("<ArchivoXml></ArchivoXml>");
xmldoc->Active = true;


y asi ya se manipula como siempre... y esta interface liberara el objeto automaticamente cuando se descontinue su uso saliendo del scope

esta manera solo funciona si se declara xmldoc en el mismo scope donde se manipula ...

y para usarse TXMLDocument en una clase sin form...se hace un truco para pasarle un TDataModule como owner para poder ser manipulado normalmente ..

de esta manera me funciono

declaracion de clase TXmlOps en XmlOps.h

class TXmlOps
{
private:

TDataModule *dm;
TXMLDocument *xd;

public:

__fastcall TXmlOps();
void __fastcall GetActive();

};

implementacion de clase TXmlOps en XmlOps.cpp


__fastcall TXmlOps::TXmlOps()
{

dm = new TDataModule(NULL);
xd = new TXMLDocument(dm);
xd->DOMVendor = GetDOMVendor("MSXML");
xd->NodeIndentStr = " ";
xd->Options = xd->Options << doNodeAutoIndent;
xd->ParseOptions = xd->ParseOptions << poValidateOnParse;

}


void __fastcall TXmlOps::GetActive()
{

xd->Active = true;

}

ya posteriormente puedes llenar la clase con mas metodos que te sean utiles para manipular TXMLDocument

para usar esa clase seria de esta manera:

TXmlOps *XmlOps = new TXmlOps();

ya que si lo haces de esta manera

TXmlOps *XmlOps;

habra un access violation .. ya que el truco se efectua en el constructor de la clase para poder manipular TXMLDocument sin form

recuerda incluir estos includes en la unit(en el .h) donde tengas tu TXMLDocument

#include <msxmldom.hpp>
#include <XMLDoc.hpp>
#include <xmldom.hpp>
#include <XMLIntf.hpp>

esto ha sido probado en borland c++ builder 6 y borland c++ builder 2006

desconozco su funcionamiento en versiones anteriores
espero que les sirva a todo aquello que use esta clase

Saludos!
_________________
Hermes David Montes de oca Segovia
dodongoxp@yahoo.com

[jotny]

hola.

he probado tu clase compila bien y todo.

pero no comprendo cómo puedo buscar los nodos y leer su contenido.

como haces el ciclo de busqueda para encontrar un nodo de nombre "DETALLE" y en ella capturar todos los subnodos en que cada uno tiene nombre, rut, direccion, etc.
??.

quiero rescatar los datos detalle de una factura en xml y mostrarlo de una forma adecuada, espero alguien me ayude.
de antemano muchas gracias