Parcourir fichier XML
Résolu
marvenjabloun
Messages postés
7
Date d'inscription
mardi 3 avril 2007
Statut
Membre
Dernière intervention
3 juin 2007
-
16 mai 2007 à 17:01
marvenjabloun Messages postés 7 Date d'inscription mardi 3 avril 2007 Statut Membre Dernière intervention 3 juin 2007 - 16 mai 2007 à 18:34
marvenjabloun Messages postés 7 Date d'inscription mardi 3 avril 2007 Statut Membre Dernière intervention 3 juin 2007 - 16 mai 2007 à 18:34
2 réponses
dominique.stock
Messages postés
436
Date d'inscription
vendredi 7 novembre 2003
Statut
Membre
Dernière intervention
8 octobre 2008
7
16 mai 2007 à 17:23
16 mai 2007 à 17:23
Bonjour,
Et en débogage, cela plante où ?
Sinon, dans l'ide , quand tu as ce message d'erreur :'Chercher' puis 'Erreur d'exécution' et tu rentres l'adresse de l'erreur .
Dom
Et en débogage, cela plante où ?
Sinon, dans l'ide , quand tu as ce message d'erreur :'Chercher' puis 'Erreur d'exécution' et tu rentres l'adresse de l'erreur .
Dom
marvenjabloun
Messages postés
7
Date d'inscription
mardi 3 avril 2007
Statut
Membre
Dernière intervention
3 juin 2007
16 mai 2007 à 18:34
16 mai 2007 à 18:34
En effet,j ai plus d erreur de violation d acces des que j ai mis le test eleve<>nil de boucle while mais le probleme c qu 'il prend eleve toujours pour nil c a dire je peu pas recuperer le noeud eleve et apparament c ça le probleme moi j ai utiliser dans le code ci dessus la fonction GetChildNodeByName dont voila le code:
{ **************************************************************************** }
{ Function GetChildNodeByName }
{ }
{ Paramètre : Node, racine de l'arbre XML }
{ ChildNodeName, nom du noeud cherché }
{ }
{ Retourne un noeud de l'arbre XML dont on donne le nom. Retourne NULL si le }
{ noeud n'est pas dans l'arbre. }
{ }
{ **************************************************************************** }
function TFFonctionsUtiles.GetChildNodeByName(Node : IXMLNode; ChildNodeName
: string) : IXMLNode;
var j: Integer;
res: IXMLNode;
begin
j := 0;
res := nil;
with Node.ChildNodes do
begin
res := FindNode(ChildNodeName);
while (res = nil) and (j < Count) do
begin
res := GetChildNodeByName(Nodes[j], ChildNodeName);
j := j + 1;
end;
GetChildNodeByName := res;
end;
end;
cette fonction est validé et j ai deja testé (c pas moi qui a ecrit)
mais generalment si on a un fichierXMl comme la mienne la au dessu si je veux reccuperer les valeur des attributs de balise eleve comment on fait ???
{ **************************************************************************** }
{ Function GetChildNodeByName }
{ }
{ Paramètre : Node, racine de l'arbre XML }
{ ChildNodeName, nom du noeud cherché }
{ }
{ Retourne un noeud de l'arbre XML dont on donne le nom. Retourne NULL si le }
{ noeud n'est pas dans l'arbre. }
{ }
{ **************************************************************************** }
function TFFonctionsUtiles.GetChildNodeByName(Node : IXMLNode; ChildNodeName
: string) : IXMLNode;
var j: Integer;
res: IXMLNode;
begin
j := 0;
res := nil;
with Node.ChildNodes do
begin
res := FindNode(ChildNodeName);
while (res = nil) and (j < Count) do
begin
res := GetChildNodeByName(Nodes[j], ChildNodeName);
j := j + 1;
end;
GetChildNodeByName := res;
end;
end;
cette fonction est validé et j ai deja testé (c pas moi qui a ecrit)
mais generalment si on a un fichierXMl comme la mienne la au dessu si je veux reccuperer les valeur des attributs de balise eleve comment on fait ???
