Código Delphi [-] if Assigned(ListView1.Selected) then ListView1.Items[ListView1.Selected.Index].Delete;
if Assigned(ListView1.Selected) then ListView1.Items[ListView1.Selected.Index].Delete;