PC SOFT

FORUMS PROFESSIONNELS
WINDEVWEBDEV et WINDEV Mobile

Accueil → WINDEV 2025 → Extraire les différentes chaines d'une formule
Extraire les différentes chaines d'une formule
Débuté par Ammar.Bouallegue, 21 nov. 2004 17:04 - 1 réponse
Posté le 21 novembre 2004 - 17:04
Sooit la chaine suivante : formule = ((V100 + V200) * 2)/100

MaChaîne est une chaîne = Formule

MaSousChaîne est une chaîne = ExtraitChaîne(MaChaîne,rangPremier,???)
TANTQUE MaSousChaîne <>EOT

Trace(MaSousChaîne) //
je veoudrais qu'elle me renvoit : "V100","V200","*","2", "/", "100"
MaSousChaîne = ExtraitChaîne(MaChaîne, rangSuivant)
FIN
Posté le 22 novembre 2004 - 12:31
Si j'ai bien compris, tu souhaites appliquer un extraitChaine avec plusieurs caractères de séparation différents ("(", ")", " ", ... )??
A priori, ce n'est pas possible directement, mais tu peux transformer ta chaine pour n'avoir plus qu'un seul caractère de séparation:

MaChaine = Formule
// Remplacement des différents caractères de séparation par un caractère unique : TAB
MaChaine = Remplace (MaChaine, "(", TAB)
MaChaine = Remplace (MaChaine, ")", TAB)
MaChaine = Remplace (MaChaine, " ", TAB)
...
// Extraction à partir de la nouvelle chaine
SousChaine = ExtraitChaine (MaChaine, rangPremier, TAB)
TANT QUE
...
SousChaine = ExtraitChaine (MaChaine, rangSuivant)
FIN