caracteres indesirables

caracteres indesirables - Delphi/Pascal - Programmation

Marsh Posté le 31-10-2005 à 12:50:24    

bonjour,
Voila dans mon appli, j'ai un champs contenant le nom d'une entreprise (plusieurs mots ecrits en toutes lettres) saisit par l'utilisateur. je souhaiterais concatene tous ces mots pour n'en faire qu'un seul et retirer tous les caractères qui ne sont pas des lettres. Pour simplifier j'ai bloquer toute la saisie en majuscule ce qui evite déjà les accents...
Par exemple :
la saisie : ECOLE NATIONALE E.N.  DE PARIS
je voudrais que ca retire tous les "espaces", laes points, mais dans certains cas il peut y avoir aussi des , des & ...
ce que je voudrais que ca donne : ECOLENATIONALEENDEPARIS
Comment je dois faire ? est-ce que je met dans un tableau les caracteres valables (les lettres majuscules classiques) et je teste chaque lettre ? Dans ce cas comment je fais si c'est un caractere à retirer pour decaler toute ma chaine avec un caractere de moins ?
Merci pour vos suggestions quant à mon problème
Bonne journée

Reply

Marsh Posté le 31-10-2005 à 12:50:24   

Reply

Marsh Posté le 31-10-2005 à 12:56:06    

soit tu fais une regex soit tu parcours la chaine toi meme et tu te base sur le code ascii pour savoir si c'est correcte ou pas
 
ps : etre en majuscule n'empeche pas les accents :o É È


---------------
Nos estans firs di nosse pitite patreye...
Reply

Marsh Posté le 31-10-2005 à 13:59:51    

merci pou ta reponse
j'avais pensé a un truc du style  
 
result ='';
for i=1 to length(machaine)
if machaine[i] in ['A'..'Z'] then result := result + machaine[i]
 
et a prioiri ca fonctionne
Bonne aprem'

Reply

Marsh Posté le 31-10-2005 à 14:02:33    

a oui, simplement...


---------------
Nos estans firs di nosse pitite patreye...
Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed