Accès au données d'une Stringlist

Bonjour,

J'utilise avec une stringlist la propriété Value :

Retour_Fonction.Add('Fichier_a_Traiter=nom1');
Retour_Fonction.Add('Erreur=0');

Retour_Fonction.Add('Fichier_a_Traiter=nom2');
Retour_Fonction.Add('Erreur=1');

Pratique pour retouver la valeur de fichier_a_traiter en faisant :

retour_fonction.values['fichier_a_traiter']

JE récupère nom1 mais comment faire pour récupérer nom 2

Merci d'avance,

Laurent

Deux possibilités mais y'a peut être d'autres solutions plus appropriées:

1) tu te fais une boucle sur la propriété names[index] et quand tu as "nom_fichier" ben tu récupères le nom du fichier...

2) tu utilises deux stingList, une contenant les noms des fichiers, l'autres les erreurs... quand tu ajoutes un fichier et son erreur, tu le fais au même indice dans tes deux stringList évidemment donc ensuite, tu peux parcourir tes noms de fichiers tranquillement et lire en parallèle leurs codes erreurs respectifs...

Tu vois ce que je veux dire ?

Citation:

---

Envoyé par bremer

Bonjour,

J'utilise avec une stringlist la propriété Value :

Retour_Fonction.Add('Fichier_a_Traiter=nom1');
Retour_Fonction.Add('Erreur=0');

Retour_Fonction.Add('Fichier_a_Traiter=nom2');
Retour_Fonction.Add('Erreur=1');

Pratique pour retouver la valeur de fichier_a_traiter en faisant :

retour_fonction.values['fichier_a_traiter']

JE récupère nom1 mais comment faire pour récupérer nom 2

Merci d'avance,

Laurent

---

tu ne peux pas. Values[] te retournera la première ligne (je pense) et ignorera l'autre.

je pense que la meilleur solution est de repenser la façon dont tu retournes tes informations.

Citation:

---

Envoyé par Paul TOTH

tu ne peux pas. Values[] te retournera la première ligne (je pense) et ignorera l'autre.

---

Exact. Values utilise la fonction TStrings.IndexOfName qui ramène uniquement la 1° occurrence de Name.

Tu peux faire simplement ceci:

Code:

---

1 2 3 4 5 6 7 8 9 10

procedure FilterName(const AName: string; Source, Dest: TStrings); var I: Integer; begin for I := 0 to Source.Count - 1 do begin if Source.Names[I] = AName then Dest.Add(Source.ValueFromIndex[I]); end; end;

---

@+ Claudius

Citation:

---

Envoyé par Cl@udius

Exact. Values utilise la fonction TStrings.IndexOfName qui ramène uniquement la 1° occurrence de Name.

Tu peux faire simplement ceci:

Code:

---

1 2 3 4 5 6 7 8 9 10

procedure FilterName(const AName: string; Source, Dest: TStrings); var I: Integer; begin for I := 0 to Source.Count - 1 do begin if Source.Names[I] = AName then Dest.Add(Source.ValueFromIndex[I]); end; end;

---

@+ Claudius

---

Voilà, c'est ce que je proposais dans ma solution n°1 un peu plus haut ;)

Citation:

---

Envoyé par peter27x

Voilà, c'est ce que je proposais dans ma solution n°1 un peu plus haut ;)

---

Citation:

---

Envoyé par peter27x

1) tu te fais une boucle sur la propriété names[index] et quand tu as "nom_fichier" ben tu récupères le nom du fichier...

---

C'est exactement ça. ;)

Citation:

---

Envoyé par Cl@udius

C'est exactement ça. ;)

---

Mais ceci dit, je pense que la solution n°2 (voir un peu plus haut) est la plus simple et la plus facile tant à mettre en place qu'à utiliser.