Discussion :

[remixtech]

Bonjour ,

Je vous explique brièvement le fonctionnement , je crée une listview contenant des informations , et une Stringlist contenant le nom et le chemin du fichier concerné ...

Je crée comme cela ma listview et ma Tstringlist ...

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
 with MonTabSheet do
    begin
....
    end;
    with TListView.Create(self) do
    begin
....
    end;
      with TSTRINGLIST.Create do
    begin
      Name := 'SPAMLIST';
    end;

je veux y accéder comme ceci ..

Code :

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

Tstringlist(Form1.FindComponent('SPAMLIST')).Add('Ajout de TEXTE');

Seulement la Tstringlist , n'a pas la propriété NAME , donc Findcomponent ne peut être effectué ..

-> Y'a t'il un moyen de faire ce que je veux faire à l'aide d'une Tstringlist ...

Merci d'avance

[MD Software]

Au lieu de faire

Code :

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

with TStringList.Create do

fait plutôt

Code :

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

1
2
3
listeTemp = TStringList.Create;
listeTemp.name := 'SPAMLIST';
with listeTemp do

[remixtech]

En faîte je n'ai aucun problème avec la listview , c'est juste la manière d'accéder à la tstringlist que je cherche ...

[ThomasB]

ben, si c'est bien TSTRINGLIST (TStringList) qui est définie dans l'unité "Classes", sache que ce n'est pas un composant.

La preuve, tu ne donne pas la référence de ta form dans le create.
il te faut donc utiliser une variable pour stocker ta stringlist.

[Edité] tu peut stocker un objet avec tes items de ta listview, dans la propriété Object il me semble. c'est un bon endroit pour stocker ta stringlist si il en faut une par item.

[MD Software]

Je suis entièrement d'accord avec ThomasB.

[remixtech]

C'est bien ce que je pensais ...

Donc je dois utiliser une tstringList et une TLIST déclaré dans la form ...

Je crée dynamiquement une Tstringlist -> qui aura un identificateur texte qui permettra de la retrouver que je place dans la tstringList , et je pointe l'autre tstringlist dans la Tlist

Pour accéder à ma tstringlist , je recherche dans la tstringlist le texte la repérant ...
J'ai donc l'index ...
Et je n'ai plus qu'a aller voir dans au même index dans la tlist pour pouvoir accéder et modifier ma tstringlist ...

Est ce que c'est ca ? Si je n 'ai rien compris n'hésitez pas ;-)

Merci bcp

[ThomasB]

La TStringList te permet d'avoir des chaines sous forme d'item. Mais elle offre aussi la possibilité d'avoir un objet avec la propriété Objects :

Code :

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

property Objects[Index: Integer]: TObject;

donc tu utilise une seul stringlist (pas de tlist) qui permet d'associer un nom et un objet (dans ton cas une stringlist).

je vois que tu utilise un listview, moi j'utilise la stringlist 'captions' des items du listview pour stocker des infos, en indiquant que les colonnes correspondantes ne sont pas visible. (cela peut servir).

Sinon, j'adore faire lourd : tu pourrais même le faire avec une seule stringlist en utilisant les propriétés value et comatext pour tout combiner en une seule liste. fait moi signe si cela te tente !

[remixtech]

En faîte oui ca peut être une solution une seul stringlist ...
C'est d'ailleur ce que je commence à faire ...

Merci bcp ;-)