Eliminación Selectiva en ListView

[MaMu]

Tengo un problema, yo quiero eliminar los items de un ListView segun se cumpla la condicion que establezco, siendo por ejemplo, un string en un subitem determinado; lo que hago es lo siguiente:

Código Delphi [-]
if ListView2.Items.Count>0
            then begin
              for w:=0 to ListView2.Items.Count-1 do
                begin
                  if ((LowerCase(ListView2.Items.Item[w].SubItems.Strings[8]))=ruta) 
// lo verifique y ambas cadenas de strings son identicas, 
//cumple la condicion perfectamente, pero al eliminar......
                    then begin
                          ListView2.Items.Delete(ListView2.Items.Item[w].Index);
                          //Tira error Access Violation...etc.
                    end;
                end;
            end;

Que estoy haciendo mal?