lots of bugs annihilated/smashed/burned to the ground

app/DD_PM_WINDREAM/frmControl_Detail.vb

@@ -37,6 +37,18 @@ Public Class frmControl_Detail
 
     End Sub
 
+    Private Sub btnDelete_Click(sender As Object, e As EventArgs) Handles btnDelete.Click
+        Try
+            If MessageBox.Show("Wollen Sie diese Spalte wirklich löschen?", "Spalte löschen", MessageBoxButtons.YesNo) = DialogResult.Yes Then
+                TBPM_CONTROL_TABLETableAdapter.Delete(GUIDTextBox.Text)
+                Close()
+            End If
+        Catch ex As Exception
+            LOGGER.Error(ex)
+            MsgBox(ex.Message, MsgBoxStyle.Critical, "Fehler beim Löschen:")
+        End Try
+    End Sub
+
     Private Sub frmControl_Detail_FormClosing(sender As Object, e As FormClosingEventArgs) Handles Me.FormClosing
         My.Settings.frmTableColumns_Position = Me.Location
     End Sub
@@ -55,4 +67,6 @@ Public Class frmControl_Detail
         End Try
        
     End Sub
+
+
 End Class