Código Delphi [-]for i := 0 to Pred(DBGrid1.SelectedRows.Count) do if i = 11 then lista_ocorrencia.Delete(i);
for i := 0 to Pred(DBGrid1.SelectedRows.Count) do if i = 11 then lista_ocorrencia.Delete(i);