Comment ajouter une ligne dans un listview ? avec 2 colonnes ?
si je fais lv.additem('toto',nil), les chaines s'ajoutent sur la même ligne.
![]()
Comment ajouter une ligne dans un listview ? avec 2 colonnes ?
si je fais lv.additem('toto',nil), les chaines s'ajoutent sur la même ligne.
![]()
Bonjour,
Il faut que la propriété du ListView soit à vsReport, puis tu fais :
@+
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11 procedure TForm1.Button1Click(Sender: TObject); Var ListItem: TListItem; begin With ListView1 do Begin ListItem := Items.Add; ListItem.Caption := 'aaaa'; ListItem.SubItems.Add('bbbb'); End ; end;
Charly
Partager