Posez votre question Signaler

Lecture XML [Résolu]

Messages postés
132
Date d'inscription
mardi 24 décembre 2002
Statut
Membre
Dernière intervention
12 novembre 2019
 - - Dernière réponse : cs_eli42
Messages postés
132
Date d'inscription
mardi 24 décembre 2002
Statut
Membre
Dernière intervention
12 novembre 2019
 - 23 juin 2015 à 09:04
Delphi / Pascal Posez votre question Signaler
Bonjour les delphiste 7,

Malgré "F1" et mon pot "Google" toujours pas compris la lecture d'un XML
je voudrai récupérer le numéro, date, les articles (quantité, valeur, TVA, nom article), encaissement(mode,montant)


// un exemple de XML 

<?xml version="1.0"?>
<ticket version="1" numero="10182" caisse="8" annule="N" memo="N" imprime="N" devise="EURO" attente="N" type="VTE" clotureID="201426102">
   <entete>
      <creation>
         <date>07/06/2015</date>
         <heure>11:18:10</heure>
      </creation>
      <modification>
         <date>07/06/2015</date>
         <heure>11:19:53</heure>
      </modification>
      <caissier numero="0">Inconnu</caissier>
      <vendeur numero="13" service="0">jojo</vendeur>
      <plateaux nombre="0"/>
   </entete>
   <lignes nombre="4">
      <article numero="1" quantite="2.000" valeur="9.90" net="19.8000" tva="20.00" code="05005010">VIN DIVERS</article>
      <article numero="2" quantite="2.000" valeur="13.50" net="27.0000" tva="20.00" code="05005010">VIN DIVERS</article>
      <article numero="3" quantite="1.000" valeur="8.10" net="8.1000" tva="5.50" code="05011001">SODA</article>
      <article numero="4" quantite="1.000" valeur="8.10" net="8.1000" tva="5.50" code="05011001">SODA</article>
   </lignes>
   <bilan montantTTC="63.00" brut="63.00" remise="0.00" service="0.00">
      <tvas montantTaxes="8.64">
         <tva taux="20.00" base="46.80" nombre="4.000">7.80</tva>
         <tva taux="5.50" base="16.20" nombre="2.000">0.84</tva>
      </tvas>
      <encaissements montantEncaisse="63.00">
         <encaissement mode="ESPECES" devise="EURO" nombre="1" rendu="oui">11.00</encaissement>
         <encaissement mode="ESPECES" devise="EURO" nombre="1" rendu="oui">11.00</encaissement>
         <encaissement mode="ESPECES" devise="EURO" nombre="1" rendu="oui">41.00</encaissement>
      </encaissements>
   </bilan>
</ticket>


Afficher la suite 

2 réponses

Meilleure réponse
Signaler Commenter la réponse de cs_yanb
Messages postés
248
Date d'inscription
lundi 27 octobre 2003
Statut
Membre
Dernière intervention
4 mars 2016
 5
1
Merci
Salut,
Exemple rapide avec article...pareil pour les autres... 
var
  Node : IXMLNode;
  I : Integer;
begin
  XMLDocument1.LoadFromFile...
  ...
  Node := XMLDocument1.ChildNodes.Nodes['ticket'].ChildNodes.Nodes['lignes'];
  for I := 0 to Node.ChildNodes.Count-1 do
  begin
    Memo1.Lines.Add(Node.ChildNodes.Nodes[I].GetAttributeNS('numero',''));
    Memo1.Lines.Add(Node.ChildNodes.Nodes[I].Text);
  end;
end;

@+

Dire « Merci » 1

Quelques mots de remerciements seront grandement appréciés. Ajouter un commentaire

Codes Sources 205 internautes nous ont dit merci ce mois-ci

Signaler Commenter la réponse de cs_eli42
cs_eli42
Messages postés
132
Date d'inscription
mardi 24 décembre 2002
Statut
Membre
Dernière intervention
12 novembre 2019
 -
Salut yanb,
Super ca marche nickel
un grand merci a toi
...
Beau temps belle mer
Jorgio
Commenter la réponse de cs_yanb
Signaler Commenter la réponse de cs_eli42
Messages postés
132
Date d'inscription
mardi 24 décembre 2002
Statut
Membre
Dernière intervention
12 novembre 2019
0
Merci
Oups
Je vous remercie d'avance pour votre aide ou vos suggestions.

--
Commenter la réponse de cs_eli42
Répondre Posez votre question