Discussion :

[darkman13130]

Bonjour a tous je voudrais savoir si quelq'un pourrait m'aidé à modifier un caractère d'un fichier csv. C'est-à-dire je voudrais remplacer tous les points qui sont dans mon fichier txt en virgule.

ex: 2.15 -> 2,15

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
        //Déclaration des variables
        AnsiString racine,ligne3,ligne4;
        AnsiString x[1000],y[1000];
        int  i,nbrligne;
 
        TStringList *file = new TStringList();
        TStringList *li = new TStringList() ;
 
        //Execution d'OpenDialog1
        OpenDialog1->Execute();
 
        //Ouverture du fichier
        fopen((OpenDialog1->FileName).c_str(),"wr");
 
        //Racine du fichier afficher dans Edit1
        Edit1->Text=OpenDialog1->FileName;
 
        //Recuperation de la racine du fichier dans Edit2
        racine=Edit1->Text;
 
        //Lecture du fichier
        file->LoadFromFile( racine );
 
        for( nbrligne=0; nbrligne< file->Count;nbrligne++)
 
        for(i=0; i<nbrligne ;i++)
        {
                ligne3 = file->Strings[i] ;
 
                //Decoupage de la ligne a chaque espace
                li->Delimiter = ' ' ;
                li->DelimitedText = ligne3 ;
 
                x[i]=li->Strings[0];
                y[i]=li->Strings[1];
        }
        delete li ;

[sat83]

Code :

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

1
2
3
4
5
6
TStringList *fichier = new TStringList();
fichier->LoadFromFile( "C:\\MonFichier.csv" ) ;
fichier->Text = StringReplace( fichier->Text, ".", ",", TReplaceFlags() <<rfReplaceAll ) ; 
fichier->SaveToFile( "C:\\MonFichier.csv" ) ;
delete fichier ;
;

C'est une méthode pratique, mais pas forcément très optimisé et rapide! Pas vraiment à conseiller pour les très gros fichiers!

[darkman13130]

Comme d'ab sat83 à toujours réponse a tous merci