Listview sortieren: Makevisible(False)

[lucius]

Hmmm Lucki,

Delphi-Quellcode:

procedure TDemoForm.Button6Click(Sender: TObject);
var
listitem : TListItem;
i: integer;
begin
for i := pred(listview.Items.Count) downto 0 do
begin
if listitem.SubItems[1] = 'Films - DVDr' then <------------- hier stimmt was nicht.
     begin
     Listview.Items.Item[i].Delete;
     end;
end;
end;