ms2

app/DD-Record-Organiser/frmForm_Constructor_Main.vb

@@ -1628,10 +1628,23 @@ Public Class frmForm_Constructor_Main
                 End Try
 
                 If windreamSucheErgebnisse.Count > 0 Then
+                    
+
+
                     TabWindream.Text = "windream-Dateien (" & windreamSucheErgebnisse.Count & ")"
 
                     AxObjectListControl.SetIconMode(True)
                     AxObjectListControl.RemoveAllColumnHeader()
+                    Try
+                        Dim sql_ResultList = "select * from TBPMO_WINDREAM_RESULTLIST_CONFIG where guid = 1"
+                        Dim DT As DataTable = ClassDatabase.Return_Datatable(sql_ResultList, "GET RESULTLIST KONFIG")
+                        If Not DT Is Nothing Then
+
+                        End If
+                    Catch ex As Exception
+
+                    End Try
+
                     Dim param As New List(Of String)
                     'The file name
                     param.Add("szLongName")