Hi friends, I have string like this "Ram is going <<<<space>>>>> to school. And <<space>> will come after days." How can we remove extra space between words. the Nospace function will return abolishing all spaces but I need only one space between words and remove unnecessary space if more than one. Is there any function / procedure for that?
Bonjour, A première vue, il faut découper ta chaîne grâce à ExtraitChaine, puis la reconstruire via ChaineConstruit. Code (Windev): FONCTION Découpe(sChaineADécouper est chaîne):File de chaînes fListeMot est File de chaînes sRésultat est chaîne sRésultat=Bonjour visiteur, Merci de vous Inscrire ou de vous connectez pour voir les liens!(sChaineADécouper,rangPremier," ") TANTQUE sRésultat <> EOT SI sRésultat<>"" ALORS Bonjour visiteur, Merci de vous Inscrire ou de vous connectez pour voir les liens!(fListeMot,sRésultat) FIN sRésultat=Bonjour visiteur, Merci de vous Inscrire ou de vous connectez pour voir les liens!(sChaineADécouper,rangSuivant," ") FIN RENVOYER fListeMot Code (Windev): FONCTION ConstruitSansEspaceSupplémentaires(fListeMot est File de chaîne):chaîne sPhrase est une chaîne sMot est chaîne sPhrase="%1 %2" TANTQUE Bonjour visiteur, Merci de vous Inscrire ou de vous connectez pour voir les liens!(fListeMot,sMot) sPhrase=Bonjour visiteur, Merci de vous Inscrire ou de vous connectez pour voir les liens!(sPhrase,sMot,"%1 %2") FIN RENVOYER=Bonjour visiteur, Merci de vous Inscrire ou de vous connectez pour voir les liens!(sPhrase,Bonjour visiteur, Merci de vous Inscrire ou de vous connectez pour voir les liens!(sPhrase)-6) Utilisation : Code (Windev): sChaineSansEspaces=ConstruitSansEspaceSupplémentaires(Découpe(sMaChaine))
Thanks Bonjour visiteur, Merci de vous Inscrire ou de vous connectez pour voir les liens! & Bonjour visiteur, Merci de vous Inscrire ou de vous connectez pour voir les liens!.
Bonjour visiteur, Merci de vous Inscrire ou de vous connectez pour voir les liens! , ton code est bien meilleur que le mien.