Ver Mensaje Individual
  #429  
Antiguo 18-10-2011
JXJ JXJ is offline
Miembro
 
Registrado: abr 2005
Posts: 2.475
Reputación: 22
JXJ Va por buen camino
Question

Cita:
Empezado por nejamube Ver Mensaje
Si alguien quiere obtener la cadena original de la forma correcta, aqui les dejo esta funcion:

Código Delphi [-] uses XMLIntf, MSXML, XMLDoc, msxmldom; function CadenaOriginal(const xml, xsl : string ): string;var XMLDoc : IXMLDOMDocument; XSLDoc : IXMLDOMDocument; Template : IXSLTemplate; Processor : IXSLProcessor; begin Result := ''; try XMLDoc := CoFreeThreadedDOMDocument30.Create; XSLDoc := CoFreeThreadedDOMDocument30.Create; XMLDoc.load(xml); XSLDoc.load(xsl); Template := CoXSLTemplate30.Create; Template.stylesheet := XSLDoc; Processor := Template.createProcessor; Processor.input := XMLDoc; Processor.transform; result := Processor.output; finally XMLDoc := nil; XSLDoc := nil; end; end;

hola carnal. trate e hacer esa funcion con delphi 7
y no me funciono. al querer usar á í &
se muestra
|||

¿que sera?
Responder Con Cita