jj 15.03 clean up

2016-03-15 15:50:08 +01:00
parent 15b08db258
commit 052635e53a
6 changed files with 18 additions and 8 deletions
--- a/app/DD-Record-Organiser/ClassControlValues.vb
+++ b/app/DD-Record-Organiser/ClassControlValues.vb
@@ -449,6 +449,11 @@ Public Class ClassControlValues
                Dim lb As DevExpress.XtraEditors.ListBoxControl = DirectCast(control, DevExpress.XtraEditors.ListBoxControl)
                lb.SelectedIndex = -1

+
+            Case GetType(DataGridView)
+                Dim dgv As DataGridView = DirectCast(control, DataGridView)
+                dgv.Rows.Clear()
+
        End Select
    End Sub
 #End Region