Discussion :

[dz_robotix]

salut tout le monde ,

je veux allouer une matrice de TStringList , j'ai fais ceci:

Code :

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

1
2
3
4
5
 
TSringList * **list;
liste = new TStringList**[10];
for(int i=0;i;10;i++)list[i]=new TStringList*[10];
List->Strings[x][y]->Add("blabla);

Error: Poi,ter to structure required on left side of -> or ->*.

besoind de votre aide
merci d'avance

[sat83]

Whaou, ca en fait des pointeurs!

Que souhaite tu faire exactement?

Si tu veux simplement avoir une liste de TStringList, tu peux utiliser par exemple TObjectList (qui peut contenir n'importe quel objet, donc des TStringList).

Code :

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

1
2
3
4
5
6
7
8
9
10
11
 
//création du TObjectList  
  TObjectList *list = new TObjectList(true);
//création de 10 TStringList et on les ajoute dans la liste
  for( int i=0; i<10; i++)
  {
    //on alloue la mémoire pour unTStringList
    TStringList *tmp = new TStringList() ;
    //on l'ajoute a la liste
    list->Add( tmp );
  }

Ensuite pour récupérer une TStringList :

Code :

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

1
2
3
4
5
 
//récupération de la 4ième TStringList :
  TStringList *sl = (TStringList*)list->Items[3] ;
//utilisation de la TStringList, par exmeple :
  sl->Add( "blablabla" );

Ne pas oublier a la fin de détruire le TObjectList :

Code :

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

  delete list;

Ce que je te donne n'est qu'un exemple et une première approche de l'utilisation de TObjectList. Bien évidemment c'est a toi de mettre en place les protection/tests pour éviter les exceptions ou les erreurs.

.

[dz_robotix]

merci satty pour ta réponse,
ce que je veux vraiment faire c'est de gérer la TStringList comme une matrice où dans chaque case je sauvegarde une suite de mots.
du genre

Code :

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

1
2
3
 
Matrice[i][j]->Add("mot1");Matrice[i][j]->Add("mot2");
matrice[i+1][j]->Add("mot3");..................

merci d'avance

[henderson]

Salut !

On suppose qu'il existe une liste de StringList !
Il suffit de déclarer une propriété :

Code :

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

1
2
3
4
5
6
7
8
 
protected :
 
void __fastcall SetCells(int ACol, int ARow,  AnsiString Value);
AnsiString __fastcall GetCells(int ACol, int ARow);
 
public :
__property System::AnsiString Cells[int ACol][int ARow] = {read=GetCells, write=SetCells};

Les méthodes pour Cells :

Code :

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

1
2
3
4
5
6
7
8
9
10
 
void __fastcall zeMachin::SetCells(int ACol, int ARow, AnsiString Value)
{
((TStringList*)List->Items[ARow])->Strings[ACol] = Value;
}
 
AnsiString __fastcall zeMachin::GetCells(int ACol, int ARow)
{
return ((TStringList*)List->Items[ARow])->Strings[ACol];
}

Je ne montre que le mécansime idéal, car il faudra y tester ACol et ARow par rapport aux limites des deux listes !

Le nom de la classe "zeMachin" peut être celui d'une nouvelle classe.
Mais on peut aussi envisager que tout ceci appartienne à la form !
Et dans ce cas là, Cells étant membre de la form :

Code :

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

1
2
 
Cells[..][..];

Ne pas oublier de libérer les StringList ainsi que la liste !

A plus !

[sat83]

Tu peux utiliser ma solution si toutes tes TStringList ont la même taille :

Par exemple tu veux récupérer le I-ème élément de la J-ième TStringList :

Code :

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

1
2
3
  TStringList *sl = (TStringList*)list->Items[J] ;
// Afficher liste[J][I]
  ShowMessage( sl->Items[I] );

ou la même chose en plus condensée :

Code :

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

ShowMessage( ((TStringList*)list->Items[J])->Items[I] ) ;

[EDIT] Pardon, Je me rend compte que ma solution ne convient pas à ton problème. Ma solution propose 2 dimensions de Strings, alors que ce que tu souhaite c'est 2 dimensions de TStringList.

.

[dz_robotix]

merci beaucoup, c'est reglé