Delphi 7
Récupérer une Page XML dans TWebBrowser pour la mettre dans TXMLDocument:
via le TWebBrowser je récupère de mon serveur une page contenant du code XML que je voudrais récupérer dans TXMLDocument afin de pouvoir récupérer le contenu de ma base de données et le retravailler dans Delphi7. Pour accéder au contenu de Webbrowser j'utilise innerHTML, outerHTML, innerText ou outerText mais avec HTML je reçois tous les codes HTML
<BODY class=st><DIV class=e><SPAN class=b> </SPAN> <SPAN class=m><?</SPAN><SPAN class=pi>xml version="1.0" </SPAN><SPAN class=m>?></SPAN> </DIV>
<DIV class=e>
<DIV class=c style="MARGIN-LEFT: 1em; TEXT-INDENT: -2em"><A class=b onfocus=h() onclick="return false" href="#">-</A> <SPAN class=m><</SPAN><SPAN class=t>seminaires</SPAN><SPAN class=m>></SPAN></DIV>
<DIV>
<DIV class=e>
<DIV class=c style="MARGIN-LEFT: 1em; TEXT-INDENT: -2em"><A class=b onfocus=h() onclick="return false" href="#">-</A> <SPAN class=m><</SPAN><SPAN class=t>seminaire</SPAN><SPAN class=m>></SPAN></DIV>
<DIV>
et avec Text je n'ai pas l'indentation.
<?xml version="1.0" ?>
- <seminaires>
- <seminaire>
<Seminar>-1</Seminar>
<Name>Not defined</Name>
<ShortName>Not define</ShortName>
<Entreprise>-1</Entreprise>
<Password />
<LogoFile />
<RefNiveau1>false</RefNiveau1>
<RefNiveau2>false</RefNiveau2>
<AccesALM>false</AccesALM>
<AccesFiles>false</AccesFiles>
<AccesChat>false</AccesChat>
<AccesForum>false</AccesForum>
<AccesBelbin>false</AccesBelbin>
<AccesEmail>false</AccesEmail>
<AccesEVA>false</AccesEVA>
<AccesHS>false</AccesHS>
</seminaire>
Quelqu'un a-t-il une idée ?
Merci.
Etienne.
Partager