Discussion :

[Ardely]

Bonsoir,
Je cherche comment ajouter un Obect dans un Listview par ligne!
Avec un Listbox on peut le faire de cette manière.

Code :

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

1
2
 
  Listbox1.Items.AddObject('PrItem' ,MyObject);

Mais avec un Listview c'est pas la même chose.. le AddObject n'existe pas,
je cherche et ne voie pas comment faire.
Merci pour un example.
Salutations
Ardely

[Pedro]

Salut

Je cherche comment ajouter un Obect dans un Listview par ligne!

Comment ça par ligne? Tu veux dire en mode vsReport?

[TicTacToe]

et le

Code :

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

MaListView.AddItem( MaChaine, MonObjet )

ne te convient pas ?

[Cl@udius]

Salut,

Euh oui ! un AddItem() devrait convenir. Attention cependant à la destruction des objets qui n'appartiennent pas à la liste.

@+ Claudius

[Ardely]

Bonjours,
Merci pour l'example, j'ai maintenant des difficultés à récuperer les données
de mon MonObjet.
MonObjet est définit de cette manière.

Code :

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

1
2
3
4
5
6
7
8
 
 type
  TClassListQ1 = class(TObject)
  public
    Value1,  Value2 ,  Value3 : string;
  end;
  var
   MonObjet: TClassListQ1;

Ma question comment récuperer par example la Valeur, Value1 !
Salutations

[Cl@udius]

Salut

Comme ceci:

Code :

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

1
2
3
 
  // Récupére la valeur Value1 de l'objet associé au Ième élément du TListView
  MaValeur := TClassListQ1(ListView1.Items[i].Data).Value1;

@+ Claudius