Listview sortieren: Makevisible(False)

[lucius]

Hi Lucki,

Delphi-Quellcode:

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

Hat jemand nen Vorschlag?