nabil351974
Messages postés75Date d'inscriptionmardi 18 décembre 2007StatutMembreDernière intervention11 mars 2014
-
19 févr. 2011 à 11:09
nabil351974
Messages postés75Date d'inscriptionmardi 18 décembre 2007StatutMembreDernière intervention11 mars 2014
-
24 mars 2011 à 17:54
Bonjour à toutes et à tous,
je tourne en rond depuis quelques temps et j'ai pas encore réussi à convertir un chiffre avec deux zéro après le séparateur décimal :
ex: 123.00 dinars.
je veux le convertir en : cent vingt trois dinars et zéro(ou double zéro) centimes.
j'ai trouvé sur le net des sources qui gèrent des chiffres avec la virgule mais pas avec deux 00 comme centimes.
pierrotk10d
Messages postés109Date d'inscriptionmardi 13 novembre 2007StatutMembreDernière intervention17 février 20233 20 févr. 2011 à 17:08
Bonjour,
Dans ta routine de décomposition stoppes le traitement à la virgule pour les lettres et ensuite prends les deux chiffres de la partie décimale et concatènes les aux lettres
123,00
Cent vingt trois dinars et 00 centimes
cs_bminfo
Messages postés1Date d'inscriptionvendredi 25 janvier 2008StatutMembreDernière intervention10 mars 2011 10 mars 2011 à 22:45
double clique sur la forme qui contient les nombre des montant ensuite entrer le code suivant suivant le nom du champ de votre table par exemple ici ma table contient le champ 'Montant';
TFloatField(Table1.fieldByName('Montant')).DisplayFormat:='#,##0.00'
*********BMINFO A VOTRE SERVICE*********
solilog
Messages postés273Date d'inscriptionsamedi 13 juin 2009StatutMembreDernière intervention18 avril 201510 17 mars 2011 à 15:14
Salut nabil351974
J'ai écrit une petite DLL avec 2 fonctions qui retourne un nombre en chaine:
12235.99 retournera douze mille deux cent trente-cinq &devise(s) &et quatre-vingt dix-neuf ¢(s).
Il recoit 4 parametres:
- Nbr : double
- Unite, et, centime : shortstring;
MaChaine := FloatToText(123456.33, 'euro', 'et', 'cent');
Si et et cent = '' pas de décimale.
Il respecte la grammaire française, les '-', les 's' à milliard, million, unité et centimes si plus d'1, ... Suite à ton post je ne suis amusé ce week-end, j'avais rien à faire. On passe son temps comme on peut.