problème d'imporatation de fichier CSV vers une StringGrid

Version imprimable

Bonjour,
J'ai un problème lors de mon imporation de mon fichier csv, il me manque une colonne à la fin...
voici mon code :

Code:

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
void __fastcall TForm_agenda::BitBtn_importClick(TObject *Sender)
{
//chargement du fichier
ProgressBar1->Visible = true;
///////////////////////////////////
// ici on va charger la StringGrid avec le fichier
    int i;
    int j;
    char a;
    AnsiString convertisseur;
    TStringList *MyStringList = new TStringList();
    MyStringList->LoadFromFile(FilePath);
    ProgressBar1->Max = MyStringList->Count;
    ProgressBar1->Min = 0;
    ProgressBar1->Step = 1;
 
    for(i=0;i<MyStringList->Count;i++,ProgressBar1->StepIt())
    {
      convertisseur=MyStringList->Strings[i];
      // teste pour trouver les separateurs en fonction on modifie
      if (convertisseur.Pos("\t") > 0)
         a = '\t';
      else
      if (convertisseur.Pos("\;") > 0)
         a = '\;';
      else
      if (convertisseur.Pos("\,") > 0)
         a = '\,';
 
      // on va chercher le separateur soit ( "\t" ) soit ( "\;" ) soit ( "\," )
      for(j=0;(convertisseur.Pos(a)>=1);j++)
      {
        // on va chercher le separateur soit ( "\t" ) soit ( "\;" ) soit ( "\," )
        convertisseur[convertisseur.Pos(a)]='\n';
 
        //voir s'il faut ajouter un test sur le cas où j=0
        if(j>=StringGrid1->ColCount)
        StringGrid1->ColCount = j;
 
        if(i>(StringGrid1->RowCount-1))
        StringGrid1->RowCount = i+1;
 
        StringGrid1->Rows[i]->Text = convertisseur;
 
      }//fin du 2ème for
     }//fin du 1er for
    delete MyStringList;
//  Fichier_Charge = true;
  ProgressBar1->Visible = false;
}

Merci par avance pour votre aide!

23/06/2008, 11h27
moudel
Salut,

Les colCount et RowCount commencent à 1 dans les TStringGrid, donc commence ta boucle for avec j=1 et tu verras la dernière colonne. Actuellement tu importes bien mais la dernière colonne n'existe pas.

Tu pourrais aussi écrire la ligne uniquement à la fin de la boucle et pas à chaque fois dans la boucle en rajoutant un truc du style:
Code:

1 2 if (convertisseur.Pos(a) == 0) StringGrid1->Rows[i]->Text = convertisseur;
Voilà, bonne journée
27/06/2008, 09h18
ludojojo

le problème est identique... cela ne change rien au résultat final....:aie:
27/06/2008, 10h39
blondelle

Salut ludojojo
Je pense que ton code est tire de ce lien

Citation:

http://www.developpez.net/forums/sho...ght=stringgrid

En mode pas a pas je verifirais les valeurs de " i " ou de " j ", tu peut aussi les afficher avec un TLabel, ca permet de verifier le nombre de boucles et de comparer au nombre de lignes et colonnes
Il y a quand meme une ligne qui m'intrigue, je ne sais pas si on peut l'ecrire

Citation:

for(i=0;i<MyStringList->Count;i++,ProgressBar1->StepIt())
27/06/2008, 11h55
sat83
Citation:

Envoyé par blondelle

Il y a quand meme une ligne qui m'intrigue, je ne sais pas si on peut l'ecrire:
for(i=0;i<MyStringList->Count;i++,ProgressBar1->StepIt())

Si, on peu très bien écrire cela, c'est une particularité des boucles for en c++, on peut placer plusieurs (ou au contraire aucune) instruction dans l'initialisation et dans l'incrément.

Pour t'en convaincre tu peux essayer une boucle du style :
Code:

1 2 int i, j ; for(i=0, j=10; i<10; i++, ShowMessage(i), ShowMessage(j) );

Concernant l'import de fichier CSV dans un TStringGrid, voici une fonction que j'utilise souvent et qui marche sans problème, si jamais ca peut t'etre utile :

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
void __fastcall TForm1::BitBtn1Click(TObject *Sender)
{
  TStringList *fichier = new TStringList();
  fichier->LoadFromFile( "D:\\essai.csv" ) ;
 
  TStringList *ligne ;
 
  StringGrid1->RowCount = fichier->Count ;
 
  for( int i=0; i< fichier->Count; i++ )
  {
    ligne = new TStringList() ;
    ligne->Text = StringReplace(fichier->Strings[i], ',' , "\n", TReplaceFlags()<< rfReplaceAll );
    StringGrid1->ColCount = ligne->Count ;
    for(int j=0; j < ligne->Count; j++)
    {
      StringGrid1->Cells[j][i] = ligne->Strings[j] ;
    }
    delete ligne ;
  }
  delete fichier ;
}

A noter que dans cet exemple le délimiteur est fixe (','), mais que ce n'est pas trop compliqué d'en ajouter d'autres...