请问在LISTVIEW中怎样删除重复的个数

Question

查找都有重复的ITEM直接删除就可以了

Answer 1

var
   iCount
begin
     for iCount := 0 to listview.items.Count - 1 do
     begin
          listview.item[iCount].subitem[0]+listview.item[iCount].subitem[1]+listview.item[iCount].subitem[2]:=123     end;
end;

Answer 2

var
iCount: Integer;
begin
for iCount := 0 to listview.items.Count - 1 do
begin
listview.item[iCount].subitem[0]+listview.item[iCount].subitem[1]+listview.item[iCount].subitem[2]:=123
end;
end;

Answer 3

var
  i, Count: integer;Count := 0;
for i := lv1.Items.Count - 1 downto 0 do
begin
  if (listview.item[i].subitem[0]+listview.item[i].subitem[1]+listview.item[i].subitem[2]='123') then
  begin
    if Count = 0 then
      Inc(Count)
    else
      lv1.Items[i].Delete;
  end;
end;