MS SQL NI

ToolCollection/frmNIProfilhinzufuegen.vb

@@ -594,4 +594,14 @@ Public Class frmNIProfilhinzufuegen
     Private Sub cmbInitialCatalog_Click(sender As Object, e As EventArgs) Handles cmbInitialCatalog.Click
         Get_MSSQL_Databases()
     End Sub
+
+    Private Sub RadioButton2_CheckedChanged(sender As Object, e As EventArgs) Handles RadioButton2.CheckedChanged
+        If RadioButton2.Checked Then
+            txtWindreamSuche.ReadOnly = False
+            btnWindreamSuche.Visible = False
+        Else
+            txtWindreamSuche.ReadOnly = True
+            btnWindreamSuche.Visible = False
+        End If
+    End Sub
 End Class