Discussion :

[samsam007]

Bonjour le forum,

Est-il possible avec Windev de mettre chaque première lettre d'un champ de saisie (par exemple, adresse d'une personne) en majuscule et la suite en minuscule.
J'ai regardé via les masques de saisies mais il me semble que l'on peut juste mettre la première lettre en majuscule... pas les suivantes sur les autre mots^^
Existe t-il peut-être une solution par programmation ou par masque personnalisé?
Merci pour vos réponses.

Cdlt.

[Invité]

bonjour, je verrais justement par programmation, soit dans l'événement "sortie de SAI_XXXX", soit dans "à chaque modification de SAI_XXX", où je chercherais la position du prochain espace, pour ensuite mettre en majuscule le caractère qui se trouve juste après

[rudolfrudolf]

Bonjour,

avec WinDev:
Oui comme romulus001 je dirais aussi par programmation. J'avais écrit une procédure pour justement traiter les adresses postales. Par contre je testais également des chaines telles que "du, au, chez" etc... qui devaient rester en minuscules.

Ou alors:
si c'est un fichier à traiter tout simplement avec Excel et la fonction "nompropre" (première lettre en majuscule après chaque espace.)

[samsam007]

Bonjour,
Je vous remercie pour vos différents retours!!
@rudolfrudolf : auriez-vous garder cette procédure et si possible est-ce que vous pourriez m'en faire part?
Effectivement mon cas est celui de saisis d'adresses postales....
Merci d'avance.

[serendib]

samsam,

Ce n'est pas très compliqué à faire et tu seras content lorsque tu auras réussi ce challenge.
Quel intérêt, notre métier, si c'est pour chercher du code tout fait ?
(d'autant que ce cas est assez amusant à résoudre)

Ne le prends pas mal, c'est sans intention négative.

[ABDev]

Hello,
C'est tout simple à faire. Voici mon code :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
PROCEDURE UcFirst(sString)
 
sString_Part, sString_New sont des chaînes
 
POUR TOUTE CHAÎNE sString_Part, sString_Sep DE sString SEPAREE PAR [" ", "-"]
	sString_Part = Minuscule(sString_Part)
 
	sString_New += Majuscule(sString_Part[[1]]) + sString_Part[[2 A]]
	sString_New += sString[[sString_Sep + Taille(sString_Part)]]
FIN
 
RENVOYER SansEspace(sString_New)

[samsam007]

bonjour ABDev,

Super le bout de code!! Un grand merci.

[Timaoui Abdellah]

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
 
PROCÉDURE PremierLettreMajuscule(Phrase)
 
Resultat est une chaîne
 
POUR TOUT CHAÎNE Mot DE Phrase SEPAREE PAR [" ", "-"]
	Resultat += Majuscule(Mot[[1]]) + Mot[[2 À]] + "  "
FIN
LIB_SansNom11 = Resultat

[Obturatix]

Bonjour à tous,
je crois que normalement, les 6 lignes d'une adresse doivent être en majuscules ( obligatoire pour les 3 dernières...)
38 caractères max possible par ligne.
maintenant cela à peut-être changé, mais j'en doute.
Bonne soirée
Obturatix