MS:02.11.2015

app/DD-Record-Organiser/frmDokumentart_Konfig.vb

@@ -187,6 +187,7 @@
                 Me.INDEXNAMEComboBox.Items.Clear()
                 Dim indexe = ClassWindream.GetIndicesByObjecttype(OBJEKTTYPComboBox.Text)
                 If indexe IsNot Nothing Then
+                    Me.INDEXNAMEComboBox.Items.Add("(ONLY for Nameconvention)")
                     For Each index As String In indexe
                         Me.INDEXNAMEComboBox.Items.Add(index)
                     Next
@@ -300,4 +301,14 @@
         End Try
     End Sub
 
+    Private Sub INDEXNAMEComboBox_SelectedIndexChanged(sender As Object, e As EventArgs) Handles INDEXNAMEComboBox.SelectedIndexChanged
+        If INDEXNAMEComboBox.SelectedIndex <> -1 Then
+            If COMMENTTextBox.Text = String.Empty Then
+                If INDEXNAMEComboBox.Text = "(ONLY for Nameconvention)" Then
+                    COMMENTTextBox.Text = "Please insert a description for this placeholder"
+                End If
+
+            End If
+        End If
+    End Sub
 End Class