IdentifiantMot de passe
Loading...
Mot de passe oublié ?Je m'inscris ! (gratuit)
Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

C++Builder Discussion :

convertir des chiffres en lettres [Débutant]


Sujet :

C++Builder

Vue hybride

Message précédent Message précédent   Message suivant Message suivant
  1. #1
    Membre actif
    Inscrit en
    Janvier 2010
    Messages
    27
    Détails du profil
    Informations forums :
    Inscription : Janvier 2010
    Messages : 27
    Par défaut convertir des chiffres en lettres
    salut;
    je veux réaliser une application pour mon petit projet je dois convertir des chiffres en lettres c'est a dire 1 on un, 2 on deux ect.....
    voila avec un button un edit et un label
    merci de m'aidez

  2. #2
    Rédacteur
    Avatar de blondelle
    Homme Profil pro
    Inscrit en
    Mars 2006
    Messages
    2 738
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France

    Informations forums :
    Inscription : Mars 2006
    Messages : 2 738
    Par défaut
    Salut bicha_27
    Voici un code
    CONVERSION DES CHIFFRES EN LETTRES
    l'auteur du code original est gagah1
    j'ai un peu retravailler le code il semble fonctionner
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    12
    13
    14
    15
    16
    17
    18
    19
    20
    21
    22
    23
    24
    25
    26
    27
    28
    29
    30
    31
    32
    33
    34
    35
    36
    37
    38
    39
    40
    41
    42
    43
    44
    45
    46
    47
    48
    49
    50
    51
    52
    53
    54
    55
    56
    57
    58
    59
    60
    61
    62
    63
    64
    65
    66
    67
    68
    69
    70
    71
    72
    73
    74
    75
    76
    77
    78
    79
    80
    81
    82
    83
    84
    85
    86
    87
    88
    89
    90
    91
    92
    93
    94
    95
    96
    97
    98
    99
    100
    101
    102
    103
    104
    105
    106
    107
    108
    109
    110
    111
    112
    113
    114
    115
    116
    117
    118
    119
    120
    121
    122
    123
    124
    125
    126
    127
    128
    129
    130
    131
    132
    133
    134
    135
    136
    137
    138
    139
    140
    141
    142
    143
    144
    145
    146
    147
    148
    149
    150
    151
    152
    153
    154
    155
    156
    157
    158
    159
    160
    161
    162
    163
    164
    165
    166
    167
    168
    169
    170
    171
    172
    173
    174
    175
    176
    177
    178
    179
    180
    181
    182
    183
    184
    185
    186
    187
    188
    189
    190
    191
    192
    193
    194
    195
    196
    197
    198
     
    //---------------------------------------------------------------------------
    #include <vcl.h>
    #pragma hdrstop
    #include "Unit1.h"
    #include "SysUtils.hpp" // <----- ne pas oublier
    //---------------------------------------------------------------------------
    #pragma package(smart_init)
    #pragma resource "*.dfm"
    TForm1 *Form1;
    //---------------------------------------------------------------------------
    __fastcall TForm1::TForm1(TComponent* Owner)
            : TForm(Owner)
    {
    /*
    La valeur de chiffre ne doit pas dépasser la plage de valeur
    pour unsigned int càd 4 294 967 295 , sinon il y a erreur de
    conversion !!!
    */
    }
    //---------------------------------------------------------------------------
    void __fastcall TForm1::Button1Click(TObject *Sender)
    {
    int chiffre;
    chiffre = StrToInt(Edit1->Text);
    char lettre[256];
    unsigned int centaine, dizaine, unite, reste, y;
    bool dix = false;
    reste = chiffre;
    for(int i=1000000000; i>=1; i/=1000)
    {
            y = reste/i;
            if(y!=0)
            {
            centaine = y/100;
            dizaine  = (y - centaine*100)/10;
            unite = y-(centaine*100)-(dizaine*10);
            switch(centaine)
            {
                    case 0:
                        break;
                    case 1:
                        StrCat(lettre,"cent ");
                        break;
                    case 2:
                        if((dizaine == 0)&&(unite == 0)) StrCat(lettre,"deux cents ");
                        else StrCat(lettre,"deux cent ");
                        break;
                    case 3:
                        if((dizaine == 0)&&(unite == 0)) StrCat(lettre,"trois cents ");
                        else StrCat(lettre,"trois cent ");
                        break;
                    case 4:
                        if((dizaine == 0)&&(unite == 0)) StrCat(lettre,"quatre cents ");
                        else StrCat(lettre,"quatre cent ");
                        break;
                    case 5:
                        if((dizaine == 0)&&(unite == 0)) StrCat(lettre,"cinq cents ");
                        else StrCat(lettre,"cinq cent ");
                        break;
                    case 6:
                        if((dizaine == 0)&&(unite == 0)) StrCat(lettre,"six cents ");
                        else StrCat(lettre,"six cent ");
                        break;
                    case 7:
                        if((dizaine == 0)&&(unite == 0)) StrCat(lettre,"sept cents ");
                        else StrCat(lettre,"sept cent ");
                        break;
                    case 8:
                        if((dizaine == 0)&&(unite == 0)) StrCat(lettre,"huit cents ");
                        else StrCat(lettre,"huit cent ");
                        break;
                    case 9:
                        if((dizaine == 0)&&(unite == 0)) StrCat(lettre,"neuf cents ");
                        else StrCat(lettre,"neuf cent ");
                }// endSwitch(centaine)
                switch(dizaine)
                {
                    case 0:
                        break;
                    case 1:
                        dix = true;
                        break;
                    case 2:
                        StrCat(lettre,"vingt ");
                        break;
                    case 3:
                        StrCat(lettre,"trente ");
                        break;
                    case 4:
                        StrCat(lettre,"quarante ");
                        break;
                    case 5:
                        StrCat(lettre,"cinquante ");
                        break;
                    case 6:
                        StrCat(lettre,"soixante ");
                        break;
                    case 7:
                        dix = true;
                        StrCat(lettre,"soixante ");
                        break;
                    case 8:
                        StrCat(lettre,"quatre-vingt ");
                        break;
                    case 9:
                        dix = true;
                        StrCat(lettre,"quatre-vingt ");
                } // endSwitch(dizaine)
                switch(unite)
                {
                    case 0:
                        if(dix)
                        {
                        StrCat(lettre,"dix ");
                        }
                        break;
                    case 1:
                        if(dix)
                        {
                        StrCat(lettre,"onze ");
                        }
                        else
                        {
                        StrCat(lettre,"un ");
                        }
                        break;
                    case 2:
                        if(dix)
                        {
                        StrCat(lettre,"douze ");
                        }
                        else
                        {
                        StrCat(lettre,"deux ");
                        }
                        break;
                    case 3:
                        if(dix)
                        {
                        StrCat(lettre,"treize ");
                        }
                        else
                        {
                        StrCat(lettre,"trois ");
                        }
                        break;
                    case 4:
                        if(dix)
                        {
                        StrCat(lettre,"quatorze ");
                        }
                        else
                        {
                        StrCat(lettre,"quatre ");
                        }
                        break;
                    case 5:
                        if(dix) StrCat(lettre,"quinze ");
                        else    StrCat(lettre,"cinq ");
                        break;
                    case 6:
                        if(dix) StrCat(lettre,"seize ");
                        else    StrCat(lettre,"six ");
                        break;
                    case 7:
                        if(dix) StrCat(lettre,"dix-sept ");
                        else    StrCat(lettre,"sept ");
                        break;
                    case 8:
                        if(dix) StrCat(lettre,"dix-huit ");
                        else    StrCat(lettre,"huit ");
                        break;
                    case 9:
                        if(dix) StrCat(lettre,"dix-neuf ");
                        else    StrCat(lettre,"neuf ");
                } // endSwitch(unite)
                switch (i)
                {
                    case 1000000000:
                        if(y>1) StrCat(lettre,"milliards ");
                        else StrCat(lettre,"milliard ");
                        break;
                    case 1000000:
                        if(y>1) StrCat(lettre,"millions ");
                        else StrCat(lettre,"million ");
                        break;
                    case 1000:
                        StrCat(lettre,"mille ");
                }
            } // end if(y!=0)
            reste -= y*i;
            dix = false;
        } // end for
    if(strlen(lettre)==0) strcpy(lettre,"zero");
    Label1->Caption = lettre;
    }
    //---------------------------------------------------------------------------
    Attention le TEdit doit recevoir uniquement des chiffres et ces chiffres doivent etre des entiers

  3. #3
    Expert éminent
    Avatar de ShaiLeTroll
    Homme Profil pro
    Développeur C++\Delphi
    Inscrit en
    Juillet 2006
    Messages
    14 049
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 44
    Localisation : France, Seine Saint Denis (Île de France)

    Informations professionnelles :
    Activité : Développeur C++\Delphi
    Secteur : High Tech - Éditeur de logiciels

    Informations forums :
    Inscription : Juillet 2006
    Messages : 14 049
    Aide via F1 - FAQ - Guide du développeur Delphi devant un problème - Pensez-y !
    Attention Troll Méchant !
    "Quand un homme a faim, mieux vaut lui apprendre à pêcher que de lui donner un poisson" Confucius
    Mieux vaut se taire et paraître idiot, Que l'ouvrir et de le confirmer !
    L'ignorance n'excuse pas la médiocrité !

    L'expérience, c'est le nom que chacun donne à ses erreurs. (Oscar Wilde)
    Il faut avoir le courage de se tromper et d'apprendre de ses erreurs

  4. #4
    Membre émérite Avatar de 10_GOTO_10
    Profil pro
    Inscrit en
    Juillet 2004
    Messages
    890
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Juillet 2004
    Messages : 890
    Par défaut
    Citation Envoyé par blondelle Voir le message
    Voici un code
    CONVERSION DES CHIFFRES EN LETTRES
    l'auteur du code original est gagah1
    j'ai un peu retravailler le code il semble fonctionner
    A quelques fautes d'orthographe près:

    20 et 100 s'accordent quand ils sont multipliés par un nombre sans être suivis par un autre nombre.

    * quatre-vingts
    * quatre-vingt-trois
    * quatre cents
    * quatre cent vingt et un
    81 et 91 sont écrits avec un trait d'union:

    * quatre-vingt-un
    * quatre-vingt-onze
    source : http://leconjugueur.lefigaro.fr/frlesnombres.php

    Le français est une langue formidable, quand même

  5. #5
    Rédacteur
    Avatar de blondelle
    Homme Profil pro
    Inscrit en
    Mars 2006
    Messages
    2 738
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France

    Informations forums :
    Inscription : Mars 2006
    Messages : 2 738
    Par défaut
    Salut 10_GOTO_10
    Je sais qu'il y a des fautes d'orthographe dans le code, si il n'y a que cela a revoir c'est un moindre mal non?
    Comme deux autres post on ete ouvert avec le meme sujet
    J'aimerais que bicha_27 nous dit si son probleme est resolu car c'est le seul poste ou il y a des reponses

  6. #6
    Membre actif
    Inscrit en
    Janvier 2010
    Messages
    27
    Détails du profil
    Informations forums :
    Inscription : Janvier 2010
    Messages : 27
    Par défaut
    salut, merci pour votre aide
    j'ai tester le code il affiche des signe a coté des lettre

  7. #7
    Rédacteur
    Avatar de blondelle
    Homme Profil pro
    Inscrit en
    Mars 2006
    Messages
    2 738
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France

    Informations forums :
    Inscription : Mars 2006
    Messages : 2 738
    Par défaut
    que donne tu comme valeur a convertir, quelle est ta version BCB

+ Répondre à la discussion
Cette discussion est résolue.

Discussions similaires

  1. Convertir des chiffres en lettres
    Par azde7015 dans le forum VBA Access
    Réponses: 16
    Dernier message: 19/05/2019, 15h16
  2. convertir des chiffres en lettres
    Par funmatica dans le forum Langage
    Réponses: 3
    Dernier message: 04/11/2010, 18h44
  3. Convertir des chiffres en lettres
    Par bruce207 dans le forum Contribuez
    Réponses: 1
    Dernier message: 02/09/2010, 14h24
  4. Convertir des chiffres en lettres
    Par stratocasters dans le forum BIRT
    Réponses: 20
    Dernier message: 21/10/2008, 12h09
  5. convertir des chiffres en lettres
    Par stratocasters dans le forum Langage SQL
    Réponses: 1
    Dernier message: 26/08/2008, 13h47

Partager

Partager
  • Envoyer la discussion sur Viadeo
  • Envoyer la discussion sur Twitter
  • Envoyer la discussion sur Google
  • Envoyer la discussion sur Facebook
  • Envoyer la discussion sur Digg
  • Envoyer la discussion sur Delicious
  • Envoyer la discussion sur MySpace
  • Envoyer la discussion sur Yahoo