Index-Typ-Überprüfung in frmFormDesigner angepasst

Mehrere Funktionen zur Überprüfung von Index-Typen wurden geändert:
- Die Initialisierung der Variablen `oType` wurde vereinfacht.
- Eine neue Bedingung für `IndexName = "@@DISPLAY_ONLY"` wurde hinzugefügt, die die Funktion frühzeitig mit `0` beendet.
- Die bestehende Logik zur Bestimmung des Index-Typs bleibt unverändert.

app/TaskFlow/frmFormDesigner.vb

@@ -186,7 +186,10 @@ Public Class frmFormDesigner
     End Function
 
     Private Function IsNotBooleanIndex(IndexName As String) As Boolean
-        Dim oType As Integer '= WINDREAM_MOD.GetIndexType(IndexName)
+        Dim oType As Integer
+        If IndexName = "@@DISPLAY_ONLY" Then
+            Return 0
+        End If
         If IDB_ACTIVE = False Then
             oType = WINDREAM_MOD.GetIndexType(IndexName)
         Else
@@ -196,7 +199,10 @@ Public Class frmFormDesigner
     End Function
 
     Private Function IsNotDateIndex(IndexName As String) As Boolean
-        Dim oType As Integer '= WINDREAM_MOD.GetIndexType(IndexName)
+        Dim oType As Integer
+        If IndexName = "@@DISPLAY_ONLY" Then
+            Return 0
+        End If
         If IDB_ACTIVE = False Then
             oType = WINDREAM_MOD.GetIndexType(IndexName)
         Else
@@ -206,7 +212,10 @@ Public Class frmFormDesigner
     End Function
 
     Private Function IsNotVectorBooleanIndex(IndexName As String) As Boolean
-        Dim oType As Integer '= WINDREAM_MOD.GetIndexType(IndexName)
+        Dim oType As Integer
+        If IndexName = "@@DISPLAY_ONLY" Then
+            Return 0
+        End If
         If IDB_ACTIVE = False Then
             oType = WINDREAM_MOD.GetIndexType(IndexName)
         Else
@@ -216,7 +225,10 @@ Public Class frmFormDesigner
     End Function
 
     Private Function IsNotVectorDateIndex(IndexName As String) As Boolean
-        Dim oType As Integer '= WINDREAM_MOD.GetIndexType(IndexName)
+        Dim oType As Integer
+        If IndexName = "@@DISPLAY_ONLY" Then
+            Return 0
+        End If
         If IDB_ACTIVE = False Then
             oType = WINDREAM_MOD.GetIndexType(IndexName)
         Else
@@ -226,7 +238,10 @@ Public Class frmFormDesigner
     End Function
 
     Private Function IsNotVectorDatetimeIndex(IndexName As String) As Boolean
-        Dim oType As Integer '= WINDREAM_MOD.GetIndexType(IndexName)
+        Dim oType As Integer
+        If IndexName = "@@DISPLAY_ONLY" Then
+            Return 0
+        End If
         If IDB_ACTIVE = False Then
             oType = WINDREAM_MOD.GetIndexType(IndexName)
         Else