//增加
var
i:integer;
listitem:tlistitem;
begin
listitem:=listview1.item.add;
listitem.caption:=inttostr(i);
listitem.subitems.add('第'+inttostr(i)+'行');
listitem.subitems.add('第三列内容');
end;
//运行结果:在listview中添加一列
//0(表示listview中有0个项目) 第0行 第三列内容
//删除某行
ListView1.Items.Item[i].Delete();
//选中一行
if ListView1.Selected <> nil then
Edit1.Text := ListView1.Selected.Caption;