diff --git a/app/DD_PM_WINDREAM/frmFormDesigner.vb b/app/DD_PM_WINDREAM/frmFormDesigner.vb index 9ab8225..a9c7a8a 100644 --- a/app/DD_PM_WINDREAM/frmFormDesigner.vb +++ b/app/DD_PM_WINDREAM/frmFormDesigner.vb @@ -40,9 +40,12 @@ Public Class frmFormDesigner Dim sortedIndicies = unsortedIndicies.OrderBy(Function(index As String) index).ToList() Windream_AllIndicies = sortedIndicies - Windream_ChoiceLists = clsWD_GET.GetChoiceLists() Windream_VectorIndicies = Windream_AllIndicies.FindAll(AddressOf IsVectorIndex) Windream_SimpleIndicies = Windream_AllIndicies.Except(Windream_VectorIndicies).ToList() + + Windream_ChoiceLists = New List(Of String) + Windream_ChoiceLists.Add(String.Empty) + Windream_ChoiceLists.AddRange(clsWD_GET.GetChoiceLists()) Catch ex As Exception MsgBox("Fehler bei Initialisieren von windream: " & vbNewLine & ex.Message, MsgBoxStyle.Critical, "Achtung:") End Try