Datei in einer zip löschen

[-Phantom-]

hab das hier gefunden

Delphi-Quellcode:

procedure TForm1.Delete1Click(Sender: TObject);
var
  i : Longint;
begin
  Panel1.Caption := '';
  with AbZipView1 do
    for i := 0 to Pred(Count) do
      Items[i].Tagged := Selected[i];
  AbZipKit1.DeleteTaggedItems;
  Panel1.Caption := '';
end;

Aber Problem: ich benutze nicht die AbzipView1 sonder die listview1 und die hat kein "tagged".
Geht das auch mit der normalen listview?