PC SOFT

FORUMS PROFESSIONNELS
WINDEV, WEBDEV et WINDEV Mobile

Accueil  |  Messages récents  | Connexion  |   | Français  FR
Accueil → WINDEV (précédentes versions) → récupération d'une chaine en otant les chiffres
récupération d'une chaine en otant les chiffres
Débuté par pascal, 08 juil. 2004 19:30 - 3 réponses
#1
Posté le 08 juillet 2004 - 19:30
je voudrais récupérer une chaine quelconque sans les chiffres qu'elle pourrait
contenir.
ex: je veux récupérer la chaine "vuvu" a partir de la chaine "vuvu558"
y'a-t-il une fonction ou un moyen pour ca?
merci
#2
Posté le 09 juillet 2004 - 14:17
Voilà une fonction toute simple:

FONCTION RetireChiffre(texte)

texte=SansEspace(texte)
c est entier
Res est chaîne
Car est chaîne

POUR c=1 A Taille(texte)
Car=Milieu(texte,c,1)
SI Asc(Car)<48 OU Asc(Car)>57 ALORS Res=Res+Car
FIN

RENVOYER Res
#3
Posté le 13 juillet 2004 - 19:17
Ce petit bout de code devrait faire l'affaire :

FONCTION TexteSeulement(TmpChaine)

i est un entier


POUR i = 0 A 9 PAS 1
TmpChaine = Remplace(TmpChaine,i,"")
FIN

RENVOYER TmpChaine



"pascal" <natelhof@nyx.unice.fr> a écrit dans le message de
news:40ed6878$1@news.pcsoft.fr...


je voudrais récupérer une chaine quelconque sans les chiffres qu'elle

pourrait
contenir.
ex: je veux récupérer la chaine "vuvu" a partir de la chaine "vuvu558"
y'a-t-il une fonction ou un moyen pour ca?
merci
#4
Posté le 20 juillet 2004 - 18:19
Je ne crois pas qu'il y ait une fonction dédiée mais tu peux
utiliser la fonction "Remplace" :
<Résultat> = Remplace(<Chaîne initiale>, <Chaîne à remplacer>, <Nouvelle
chaîne>)

Exemple : suppression des "5"
nouvelle_chaine = Remplace(chaine_initiale, "5", "")

Il suffit de la répéter pour les chiffres de 0 à 9.

Voilà.



"pascal" <natelhof@nyx.unice.fr> wrote:

je voudrais récupérer une chaine quelconque sans les chiffres qu'elle pourrait
contenir.
ex: je veux récupérer la chaine "vuvu" a partir de la chaine "vuvu558"
y'a-t-il une fonction ou un moyen pour ca?
merci
→ Revenir à WINDEV (précédentes versions)