Make it possible to delete rows

MultiTool.Form/GridLoader.vb

@@ -11,12 +11,7 @@ Public Class GridLoader
         MyBase.New(pLogConfig, pLogConfig.GetLogger())
     End Sub
 
-    Public Function GetGridFromElement(pTable As Schemas.Schema.Table) As GridControl
-        Dim oGrid As New GridControl With {
-            .Dock = DockStyle.Fill,
-            .Name = pTable.Name
-        }
-
+    Public Function GetGridFromElement(pGrid As GridControl, pTable As Schemas.Schema.Table) As GridControl
         Dim oInvisibleColumns As New List(Of String) From {
             "BELEGKEY",
             "Zeilennummer",
@@ -28,10 +23,11 @@ Public Class GridLoader
             "Laufnummer"
         }
 
-        oGrid.ForceInitialize()
-        oGrid.MainView.PopulateColumns()
+        pGrid.Name = pTable.Name
+        pGrid.ForceInitialize()
+        pGrid.MainView.PopulateColumns()
 
-        Dim oView As GridView = oGrid.DefaultView
+        Dim oView As GridView = pGrid.DefaultView
         oView.OptionsBehavior.ReadOnly = True
         oView.OptionsBehavior.Editable = False
 
@@ -63,7 +59,7 @@ Public Class GridLoader
             WithReadOnlyOptions().
             WithClipboardHandler()
 
-        Return oGrid
+        Return pGrid
     End Function
 
     Private Function GetColumnType(pColumn As Schemas.Schema.Column)