jj: WIP - VectorIndexing

Global_Indexer/ClassWindream.vb

@@ -444,10 +444,7 @@ Public Class ClassWindream
 
             If indexnamen Is Nothing Then Return False
 
-            For Each index As String In indexnamen
-                If index = indexname Then Return True
-            Next
-
+            Return indexnamen.Contains(indexname)
         Catch ex As Exception
             MsgBox("Beim Prüfen ob ein Index für einen Objekttypen existiert, ist ein Fehler aufgetreten." & vbNewLine & vbNewLine & "Fehlernachricht:" & vbNewLine & ex.Message, MsgBoxStyle.Critical, "Unexpected error inm Prüfen auf Existenz eines Index in einem Objekttyp")
         End Try