Γεια σας,

το προβλημα μου ειναι οτι δεν μπορω να διαγραψω τις επιλεγμένες γραμμες σε ενα datagrid (συγκεκριμενα σε C1TrueDbGrid).

Εκτελώ τον ακολουθο κωδικα:

Dim o As Object 'Selected Rows

Dim todelRows As New Collection 'Collection for row to delete

Dim selRow As Integer

For Each o In Me.C1TrueDBGrid1.SelectedRows

todelRows.Add(CInt(o.ToString))

Next o

For i As Integer = todelRows.Count To 0 Step -1

Me.C1TrueDBGrid1.Delete(selRow)

Next i

το προβλημα ειναι οτι με τον συγκεκριμενο κωδικα διαγραφονται κατα μια περισσότερες επιλεγμενες γραμμες.

Δοκιμασα να τρεξω το loop για το selectedrows collection αλλα προέκυψε σφαλμα

Collection was modified; enumeration operation may not execute.

Καποια βοηθεια;

Αν και δεν έχω δουλέψει με το συγκεκριμένο control, θα σου δώσω ένα γενικότερο hint: Όταν δουλεύεις με binded controls η λογική σου θα πρέπει να είναι ΑΠΟ τα data ΠΡΟΣ το control και όχι το ανάποδο. Δηλαδή, διαγράφεις τα data από το datasource και βλέπεις το control με τα νέα περιεχόμενα. Απλά από το control καταλαβαίνεις ΤΙ πρέπει να διαγράψεις (πχ το selected datarow ή τα ID's όλων των selected datarows ή το collenction από τα selected datarows).

Ρίξε μια ματιά στα HowTos του DataGridView, κάπως ανάλογα θα πρέπει να δουλεύει και το C1TrueDbGrid...

Το πρόβλημά σου είναι η Count.

Τι σημαίνει αυτό σε σχέση με τον παραπάνω κώδικα που γράφεις. Ο χρήστης επιλέγει δύο Rows για διαγραφεί. Οπότε σωστά η Count θα είναι ίσον με δύο. Όμως η δήλωση todelRows.Count To 0 Step -1 θα κάνει loop τρεις φορές.

Μία για το 2, άλλη μία για το 1 και άλλη μία για το 0.

Μπορείς να το προσπεράσεις αυτό βάζοντας Count-1 ή αντί το To 0 να το κάνεις To 1.