Séparer une valeur entière par des points tous les trois chiffre

denisbertin 127 Messages postés lundi 22 avril 2013Date d'inscription 22 octobre 2017 Dernière intervention - 2 juin 2017 à 11:52 - Dernière réponse : Cirec 4191 Messages postés vendredi 23 juillet 2004Date d'inscriptionModérateurStatut 12 décembre 2017 Dernière intervention
- 2 juin 2017 à 18:28
Commentaires sur une source Créer une discussion Signaler Répondre
Cette discussion concerne un article du site. Pour la consulter dans son contexte d'origine, cliquez sur le lien ci-dessous.

http://codes-sources.commentcamarche.net/source/102001-separer-une-valeur-entiere-par-des-points-tous-les-trois-chiffre

Afficher la suite 
Cirec 4191 Messages postés vendredi 23 juillet 2004Date d'inscriptionModérateurStatut 12 décembre 2017 Dernière intervention - 2 juin 2017 à 18:28
Salut,

voici une alternative plus souple:
function IntToFmtStr(aInt: Integer; const aThousandSeparator: Char = #32): string;
begin
ThousandSeparator := aThousandSeparator;
Result := Format('%0.n', [aInt/1]);
ThousandSeparator := ' ';
end;


utilisation:
  Caption := IntToFmtStr(100000000); // Affiche 100 000 000

  Caption := IntToFmtStr(100000000, '.'); // Affiche 100.000.000

  Caption := IntToFmtStr(100000000, '-'); // Affiche 100-000-000

@+
Commenter la réponse de denisbertin

1 réponse

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.