remplissage d'une StringGrid

**blondelle** · 28/05/2006, 16h24

Je teste un programme en vue de remplir une StringGrid avec des coordonnees venant d'un GPS ces coordonnes sont dans un fichier texte environ 30 colonnes et plus de 6000 lignes je peu l'ouvrir, j'ai repris le code de Mattetfamilly pour charger le StringGrid mais
- premierement j'ai une erreur que ne parvient pas a resoudre
- deuxiement mon StringGrid contient 30 colonnes et apres execution une seule colonne apparait

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
//----------------------------------------------------------
#include <vcl.h>
#pragma hdrstop
#include "stringgrid.h"
//----------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;
//----------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
        : TForm(Owner)
///////////////////////////////////
{
  OpenDialog1->Options.Clear();
  OpenDialog1->Options << ofAllowMultiSelect << ofFileMustExist;
  OpenDialog1->Filter = "Fichiers TXT (*.TXT) (*.txt)|*.txt|Fichiers DOC (*.DOC) (*.doc)|*.doc|Fichiers CSV (*.CSV) (*.csv)|*.csv";
  OpenDialog1->FilterIndex = 1; // demarre le dialogue d'affichage des fichiers
//////////////////////////////////
if(OpenDialog1->Execute())
        {
        String FilePath = OpenDialog1->FileName;
 
int i;
int j;
AnsiString convertisseur;
TStringList *MyStringList = new TStringList();
MyStringList->LoadFromFile(FilePath); //Si tu as créer ton extension lors de la sauvegarde, penses à réutiliser la même ici.
for(i=0;i<MyStringList->Count;i++)
{
convertisseur=MyStringList->Strings[i];
for(j=0;(convertisseur.Pos("\t")>=1);j++)
{
convertisseur[convertisseur.Pos("\t")]='\n';
}
//voir s'il faut ajouter un test sur le cas où j=0
StringGrid1->ColCount = j; //Il est possible que cela soit un j-1 ou un j+1...
 
if(i>(StringGrid1->RowCount-1))
StringGrid1->RowCount = i+1;
StringGrid1->Rows[i] = convertisseur;
}//fin du for
delete MyStringList; //si cette ligne te poses un soucis essayes de la supprimer: en théorie elle est nécessaire.
}

ERREUR sur la ligne soulignee
[C++ Error] stringgrid.cpp(51): E2034 Cannot convert 'AnsiString' to 'TStrings *'

**Tenguryu** · 28/05/2006, 18h13

Chaque Row est composé de Cells

Donc quand tu dit

StringGrid1->Rows[i] = convertisseur;
Tu place un ansistring dans une liste d'ansitring..pas cool

Pour accéder aux Strings d'une Row, utilises:

Code :

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

1
2
 
StringGrid1->Rows[i]->Strings[x] = convertisseur // x correspond à la ligne, 0 pour la première, souvent grisée

**blondelle** · 28/05/2006, 18h45

Merci pour la reponse Tenguryu je ne connaisse pas
maintenant cela fonctionne partiellement
je ne rempli que la 1er cellule.
En mode pas a pas je recupere bien mes chaines et j'ecremente le compteur de ligne
voici le code reecrit qui remplace la ligne source d'erreur

Code :

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

1
2
 
StringGrid1->Rows[i]->Strings[i] = convertisseur; // x correspond à la ligne, 0 pour la première, souvent grisée

**Mattetfamilly** · 28/05/2006, 23h19

Non!

Le code suivant n'est pas bon.
Il correspond à un chargement cellules per celuules.
D'ailleurs, il va remplir la grille en diagonale...

Code :

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

1
2
 
StringGrid1->Rows[i]->Strings[i] = convertisseur

Le bon code est:

Code :

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

1
2
 
StringGrid1->Rows[i]->Text = convertisseur

L'erreur indiquée correspond bien à mon erreur de saisie...
C'est normal que tu n'es qu'une colonne, c'est lié à l'erreur.
Une fois corrigée, tu devrais avoir toutes tes colonnes.

Désolé

Mattetfamilly

**blondelle** · 28/05/2006, 23h41

Je te remercie Mattetfamilly pour ta reponse et surtout ne te fais pas de soucis l'erreur est humaine et puis ca fait chercher je vais donc tester ce que tu ma donne je te tiens au courant
A +

**blondelle** · 28/05/2006, 23h52

j'ai teste ta ligne de code effectivement ca ecrit toute une colonne de plus de 6000 ligne seulement il n'y a qu'une seule colonne d'ecrite il devrait en avoir environ 30 je continue a chercher de mon cote je joind mon code

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
 
//----------------------------------------------------------
#include <vcl.h>
#pragma hdrstop
#include "stringgrid.h"
//----------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;
//----------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
        : TForm(Owner)
{
///////////////////////////////////
// ici on appelle la boite de dialogue ouvrir un fichier
// avec les options et le filtre
  OpenDialog1->Options.Clear();
  OpenDialog1->Options << ofAllowMultiSelect << ofFileMustExist;
  OpenDialog1->Filter = "Fichiers TXT (*.TXT) (*.txt)|*.txt|Fichiers DOC (*.DOC) (*.doc)|*.doc|Fichiers CSV (*.CSV) (*.csv)|*.csv";
  OpenDialog1->FilterIndex = 1; // demarre le dialogue d'affichage des fichiers
///////////////////////////////////
if(OpenDialog1->Execute())
        {
        String FilePath = OpenDialog1->FileName;
///////////////////////////////////
// ici on va charger la StringGrid avec le fichier
int i;
int j;
AnsiString convertisseur;
TStringList *MyStringList = new TStringList();
MyStringList->LoadFromFile(FilePath); //Si tu as créer ton extension lors de la sauvegarde, penses à réutiliser la même ici.
for(i=0;i<MyStringList->Count;i++)
{
convertisseur=MyStringList->Strings[i];
for(j=0;(convertisseur.Pos("\t")>=1);j++)
{
convertisseur[convertisseur.Pos("\t")]='\n';
}
//voir s'il faut ajouter un test sur le cas où j=0
StringGrid1->ColCount = j; //Il est possible que cela soit un j-1 ou un j+1...
if(i>(StringGrid1->RowCount-1))
StringGrid1->RowCount = i+1;
StringGrid1->Rows[i]->Text = convertisseur; // x correspond à la ligne, 0 pour la première, souvent grisée
}//fin du for
delete MyStringList; //si cette ligne te poses un soucis essayes de la supprimer: en théorie elle est nécessaire.
}
}

**blondelle** · 31/05/2006, 00h28

Je suis toujours en panne, je ne trouve pas comment faire pour ecrire toutes les colonnes d'une ligne (precision sur une ligne toutes les colonnes ne sont pas systemetiquement ecrites).
Quand je suis en mode pas a pas la ligne contient bien les separateurs, la colonnes 1 s'ecrit, les autres colonnes sont effacees.

**Poilou** · 31/05/2006, 10h13

Bonjour,

Pour ma part, lorsque je veux remplir une stringGrid je passe par la propriété Cells qui s'utilise de la façon suivante :

Code :

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

StringGrid1->cells[L][C] = "";

Ou L est l'index de la ligne et C l'index de la colonne.

Avec cette commande une seule cellule de la grille est remplie. Je ne vois pas trop comment fonctionne votre code...vous bouclez une premiere fois sur le nombre de ligne mais pour le 2eme for votre condition de sortie évolue pendant que vous etes dans la boucle...

Une boucle While serait plus appropriée je pense...

Poilou

**blondelle** · 31/05/2006, 13h48

Merci pour ta reponse Poilou le code n'est pas de moi je l'ai repris afin de tester la StringGrid je debute en BCB, d'apres ce que j'avais cru comprendre la ligne suivante etait sencee se placer dans chaque colonne de la ligne automatiquement un peu comme "Excel" quand on charge un fichier texte

Code :

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

1
2
 
StringGrid1->Rows[i]->Text = convertisseur;

Voila un type de chaine que je recoit dans la variable convertisseur

Code :

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

1
2
3
 
convetisseur = { Data:"Waypoint\n000018\n90 AV D Amiens - Bapaume\n User Waypoint
\n49 58.294 E2 32.679\n-0.114m\n\n\n\nSymbole & Name\nBlack\nWaypoint\n\n\n\n\n\n\n" }

Si je dois utiliser une double boucle pour passer mes parametres dans chaque colonne

Code :

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

1
2
 
StringGrid1->cells[L][C] = "convertisseur";

Je ne vois pas comment recuperer le separateur "\n" afin de traiter la chaine a passer dans chaque cellule

**Poilou** · 01/06/2006, 14h06

Bonjour,

Voici une fonction que j'utilise pour séparer les éléments d'une chaine en fonction d'un séparateur...

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
void Split_Liste(TStrings* Liste,AnsiString Original,AnsiString Separateur)
{
 while (Original.AnsiPos(Separateur) != 0)
 {
  Liste->Add(Original.SubString(1,Original.AnsiPos(Separateur) - 1));
  Original = Original.Delete(1,Original.AnsiPos(Separateur));
 }//endwhile
 
 
 if (Original.Length() > 0)
 {
  if (Original != Separateur)
   Liste->Add(Original);
 }
}

tu vas donc avoir une variable de type TStringList* Liste qui va séparer les données d'une ligne.

Tu peux ensuite boucler sur ton nombre de lignes et ensuite pour chaque lignes boucles sur le nombre de cases de la StringList

Exemple de bout de code fait à la vavite :p

Code :

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

1
2
3
4
5
6
7
8
9
10
 
TStringList* UneLigne = new TStringList();
AnsiString convertisseur; //contient les données d'une ligne
 
Split_Liste(UneLigne,convertisseur,"\n");
 
for(int j=0;j<UneLigne->Count;j++)
{
 StringGrid1->Cells[j][i] = UneLigne->Strings[j]; //i étant une variable de ta précédente boucle for
}

En espérant que ça t'aide

**blondelle** · 01/06/2006, 14h15

merci pour ta reponse Poilou je tester ton code dans mon programme decidement je suis plus doue pour excel vbe que pour bcb

**Mattetfamilly** · 01/06/2006, 19h15

Je penses qu'il y a un soucis avec les retours de chariots:
il est possible que ton fichier lors de son chargement contienne des '\r'.
Je penses que cela peut n'aficher qu'une colonne dans ces conditions...

Code :

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

1
2
3
4
5
6
7
8
9
10
11
 
convertisseur=MyStringList->Strings[i];
for(j=0;(convertisseur.Pos("\t")>=1);j++)
{
convertisseur[convertisseur.Pos("\t")]='\n';
}
do
{
convertisseur=convertisseur.delete(convertisseur.Pos("\r"),1);
}while(convertisseur.Pos("\r")>=1);
//

je pensais l'avoir mis pourtant....

**blondelle** · 01/06/2006, 19h28

Merci pour ta reponse Mattetfamilly j'ai visualise quelques chaines apparament il n'y a pas "\r" mais on ne sait jamais.
Peut tu me dire si ton code rempli bien toutes les colonnes d'une ligne meme si, ces lignes on des colonnes vides entre deux et, pas le meme nombre de colonnes par ligne.

**Mattetfamilly** · 01/06/2006, 19h33

Je crois que tu pointes bien le soucis et j'allais justement t'ajouter un post sur le sujet:

En fait la ligne suivante n'est pas suffisante:

Code :

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

1
2
 
StringGrid1->ColCount = j; //Il est possible que cela soit un j-1 ou un j+1...

corriges comme ceci:

Code :

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

1
2
3
4
5
6
 
MyStringList->LoadFromFile(FilePath); //Si tu as créer ton extension lors de la sauvegarde, penses à réutiliser la même ici.
StringGrid1->ColCount=1;//cela met la grille à une seule colonne de base
StringGrid1->RowCount=1;//cela met la grille à une seule ligne de base
for(i=0;i<MyStringList->Count;i++)
{

et corriges aussi comme cela:

Code :

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

1
2
3
 
if(j>StringGrid1->ColCount)
StringGrid1->ColCount = j; //Il est possible que cela soit un j-1 ou un j+1...

**blondelle** · 01/06/2006, 19h44

Je te remerci Mattetfamilly le code fonctionne parfaitement dans ce premier essai je vois si cela fonctionne avec mes autres fichiers et je communiquerai le code pour ceux qui en auront besoin
encore une fois merci

**blondelle** · 01/06/2006, 23h40

Je te remercie Mattetfamilly
J'ai teste ton code ca marche il faut juste que je vois en fonction du separateur "\t" ou "\;" qui est differant suivant le type fichier, les separateur "\t" "\n" sont des separateur tire du c associes a la fonction printf

**blondelle** · 03/06/2006, 10h59

J'ai trouve une solution pour tester le separateur mais il me met un warning

Code :

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

1
2
3
4
5
6
7
8
9
10
11
 
// teste pour trouver les separateurs en fonction on modifie
// (convertisseur.Pos("\t"));
if (a = (convertisseur.Pos("\t")) > 0)
a = '\t';
else
if (a = (convertisseur.Pos("\;")) > 0)
a = '\;';
else
if (a = (convertisseur.Pos("\,")) > 0)
a = '\,';

warning mis a la compilation

Code :

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

1
2
3
4
 
[C++ Warning] stringgrid.cpp(44): W8060 Possibly incorrect assignment
[C++ Warning] stringgrid.cpp(47): W8060 Possibly incorrect assignment
[C++ Warning] stringgrid.cpp(50): W8060 Possibly incorrect assignment

pourtant le programme fonctionne et le type de separateur est bien pris en compte suivant le fichier appele

**Interruption13h** · 03/06/2006, 11h12

Salut !

Je croi plutôt que tu veu faire ça :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
 
 
// teste pour trouver les separateurs en fonction on modifie
// (convertisseur.Pos("\t"));
if (convertisseur.Pos("\t") > 0)
a = '\t';
else
if (convertisseur.Pos(";") > 0)
a = ';';
else
if (convertisseur.Pos(",")> 0)
a = ',';

++

**blondelle** · 03/06/2006, 11h24

merci pour ta reponse Interruption13h ca marche je n'ais plus de message d'erreur (je suis vraiment pas tres doue)

**blondelle** · 03/06/2006, 11h34

je donne mon code pour ceux que cela interresse

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
 
//---------------------------------------------------------------------------
 
#include <vcl.h>
#pragma hdrstop
 
#include "stringgrid.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
        : TForm(Owner)
{
///////////////////////////////////
// ici on appelle la boite de dialogue ouvrir un fichier
// avec les options et le filtre
  OpenDialog1->Options.Clear();
  OpenDialog1->Options << ofAllowMultiSelect << ofFileMustExist;
  OpenDialog1->Filter = "Fichiers TXT (*.TXT) (*.txt)|*.txt|Fichiers DOC (*.DOC) (*.doc)|*.doc|Fichiers CSV (*.CSV) (*.csv)|*.csv";
  OpenDialog1->FilterIndex = 1; // demarre le dialogue d'affichage des fichiers
///////////////////////////////////
if(OpenDialog1->Execute())
        {
        String FilePath = OpenDialog1->FileName;
///////////////////////////////////
// ici on va charger la StringGrid avec le fichier
int i;
int j;
char a;
AnsiString convertisseur;
TStringList *MyStringList = new TStringList();
MyStringList->LoadFromFile(FilePath); //Si tu as créer ton extension lors de la sauvegarde, penses à réutiliser la même ici.
 
StringGrid1->ColCount=1;//cela met la grille à une seule colonne de base
StringGrid1->RowCount=1;//cela met la grille à une seule ligne de base
 
for(i=0;i<MyStringList->Count;i++)
{
convertisseur=MyStringList->Strings[i];
 
// teste pour trouver les separateurs en fonction on modifie
// (convertisseur.Pos("\t"));
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; //Il est possible que cela soit un j-1 ou un j+1...
//StringGrid1->ColCount = j; //Il est possible que cela soit un j-1 ou un j+1...
 
if(i>(StringGrid1->RowCount-1))
StringGrid1->RowCount = i+1;
 
StringGrid1->Rows[i]->Text = convertisseur; // x correspond à la ligne, 0 pour la première, souvent grisée
}//fin du for
}
delete MyStringList; //si cette ligne te poses un soucis essayes de la supprimer: en théorie elle est nécessaire.
        }
}

remplissage d'une StringGrid

C++Builder

Discussions similaires

Partager

Partager