Probleme avec TStringList

Version imprimable

12/03/2009, 11h49
apprenti0859

Probleme avec TStringList

Bonjour, voici le problème comment ajouter une TStringList dans une TstringList , il me semble que c'est avec AddStrings mais comment fait ton pour récuperer cette TStringList parce lorsque j'utilise Strings ic'est un AnsiString qui est retourné et moi je veux récupérer mon TStringList.
12/03/2009, 12h05
white_tentacle

Si tu ajoutes une TStringList dans une autre, en fait, il ajoute chacune des chaînes de la TStringList dans l'autre TStringList.

C'est à dire que l'information, comme quoi ces chaînes étaient regroupées dans une même TStringList, est perdue.

Si tu veux stocker des TStringList, il te faut un conteneur... de TStringList. Alors que TStringList est un conteneur d'AnsiString.
12/03/2009, 12h26
apprenti0859

Connaitrais-tu un conteneur de TStringList par hasard? Autrement c'est tout je vais enregistrer le count de chaque TStringList afin de pouvoir recuperer ce dont j'ai besoin.

Merci
12/03/2009, 14h24
sat83

Citation:

Envoyé par apprenti0859

Connaitrais-tu un conteneur de TStringList par hasard? Autrement c'est tout je vais enregistrer le count de chaque TStringList afin de pouvoir recuperer ce dont j'ai besoin.

Merci

Utilise par exemple TObjectList pour stocker une liste de TStringList

Un mini-exemple illustratif :

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
  TStringList *l1 = new TStringList() ;
  l1->Add( "[LIST1,LINE1]" );
  l1->Add( "[LIST1,LINE2]" );
  l1->Add( "[LIST1,LINE3]" );
  TStringList *l2 = new TStringList() ;
  l2->Add( "[LIST2,LINE1]" );
  l2->Add( "[LIST2,LINE2]" );
  l2->Add( "[LIST2,LINE3]" );
//[...]
  TObjectList *listSL = new TObjectList(true);
  listSL->Add( l1 );
  listSL->Add( l2 ) ;
//[...]
  TStringList *tmp = (TStringList*) listSL->Items[0] ;//récupération de la 1ère liste
  ShowMessage( tmp->Strings[0] ) ;// affiche "[LIST1,LINE1]"
 
  tmp = (TStringList*) listSL->Items[1] ;//récupération de la 2ème liste
  ShowMessage( tmp->Strings[2] ) ;// affiche "[LIST2,LINE3]"
//[...]
  delete listSL;

En écrivant quelques fonctions de manipulation, l'utilisation deviendra assez facile.