如何更改列表视图中的子项？

Question

我使用Listview.items.item [X] .caption更改列表框中的第一列，但现在我必须在运行时进一步更改。我看到的唯一方法是将列表框中的项目作为TListItem进行编辑，编辑它，添加它并改变位置，但这不适合它，因为我在列表视图上有很多项目。

有没有更简单的方法来实现这一点，比如我改变第一项的方式？

提前致谢。

Answer 1

试试这个

//Add a item

var
  ListItem : TListItem;
begin

  ListViewItem.Items.BeginUpdate;
try
    ListItem := ListViewItem.Items.Add;
    ListItem.Caption := 'First Column Value';
    ListItem.SubItems.Add('Second Column Value');
    ListItem.SubItems.Add('Third Column Value');
finally  
ListViewItem.Items.EndUpdate;
end;

end;

//Edit a Item

var
  ListItem : TListItem;
begin

  ListViewItem.Items.BeginUpdate;
try
    ListItem := Listview.items.item[X];
    ListItem.Caption := 'New first Column Value';
    ListItem.SubItems[0]:='New Second Column Value';
    ListItem.SubItems[1]:='New Third Column Value';
finally  
ListViewItem.Items.EndUpdate;
end;

end;