Première lettre en majuscule dans un combobox

Signaler
Messages postés
187
Date d'inscription
jeudi 16 octobre 2008
Statut
Membre
Dernière intervention
20 février 2010
-
Messages postés
187
Date d'inscription
jeudi 16 octobre 2008
Statut
Membre
Dernière intervention
20 février 2010
-
Salut
Je cherche afficher la première lettre en majuscule de toutes les lignes dans un combobox.
Merci pour votre aide
yahia

4 réponses

Messages postés
3793
Date d'inscription
samedi 22 décembre 2007
Statut
Membre
Dernière intervention
3 juin 2016
8
function AnsiFirstUpCase(const S: string; OthersMin: Boolean): string;
var
Len: Integer;
begin
Len := Length(S);
SetString(Result, PChar(S), Len);
if (Len > 1) and OtherMins then CharLowerBuff(Pointer(Result), Len);
if Len > 0 then CharUpperBuff(Pointer(Result), 1);
end;

Paramètres :
- S: la chaîne concernée
- OtherMin : mettre à True si on veut tous les autres caractères de la chaîne en minuscules (sauf le premier), mettre à False si on veut pas toucher aux autres.

Résultat : la chaîne modifiée

Désolé Cirec j'ai un peu modifié ton snippet ici, je pense qu'il faudrait proposer un choix pour mettre tous les autres caractères en minuscules, car dans certaines situations, comme : "l'individu est en France", on désirerait plutôt un résultat du type "L'individu est en France" est non pas "L'individu est en france" (désolé pour l'exemple pourri)

Cordialement, Bacterius !
Messages postés
3825
Date d'inscription
vendredi 23 juillet 2004
Statut
Modérateur
Dernière intervention
1 février 2021
38
@Bacterius:

alors là je ne suis pas d'accord avec ta façon de voir les choses ..

la fonction "AnsiFirstUpcase" a été crée justement pour mettre le premier caractère en majuscule et tous les autres en minuscules ... en dehors de ce cas de figure elle ne sert à rien et il n'est pas utile d'en créer une autre puisque nous avons à disposition UpCase & UpperCase / LowCase & LowerCase

et pour ton exemple .. ben, dans ce cas, on utilise UpCase


[hr]@+Cirec
[hr]
Messages postés
3793
Date d'inscription
samedi 22 décembre 2007
Statut
Membre
Dernière intervention
3 juin 2016
8
Ah oui on aurait pu tout simplement utiliser Upcase, j'ai pas réfléchi sur ce coup

Cordialement, Bacterius !
Messages postés
187
Date d'inscription
jeudi 16 octobre 2008
Statut
Membre
Dernière intervention
20 février 2010
3
UpCase & UpperCase / LowCase & LowerCase

yahia