Improve and localize fulltext extraction log messages

Updated log messages for fulltext extraction to be clearer and localized in German. Success and failure cases now provide accurate and user-friendly information, replacing previous misleading or English-only messages.

ToolCollection/clsNIFulltext.vb

@@ -87,7 +87,7 @@ Public Class clsNIFulltext
                                 End If
                             Else
                                 'Es gibt nur From, also auch nur einen Wert
-                                If Pos_From = oCountMatchedElements Then
+                                If Pos_From = i Then
                                     'Das Ende ist erreicht - Ausstieg
                                     ReDim Preserve Ergebnis(0)
                                     Ergebnis(0) = Convert.ToString(g.ToString)

ToolCollection/frmNIHauptseite.vb

@@ -924,9 +924,9 @@ Public Class frmNIHauptseite
                         _Logger.Debug(">> _fulltext initialized.")
                         fulltext = pMyWMDoc.GetVariableValue(aktivesProfil.Desk_windreamIndex)
                         If Len(fulltext) > 0 Then
-                            _Logger.Info($"{aktivesProfil.Desk_windreamIndex} is empty...")
+                            _Logger.Info($"Volltext aus [{aktivesProfil.Desk_windreamIndex}] erfolgreich extrahiert.")
                         Else
-                            _Logger.Info($"## No fulltext from [{aktivesProfil.Desk_windreamIndex}] extracted!")
+                            _Logger.Info($"## Kein Volltext aus [{aktivesProfil.Desk_windreamIndex}] extrahiert - versuche 'Manueller Volltext'...")
                             fulltext = pMyWMDoc.GetVariableValue("Manueller Volltext")
                         End If
                         If Len(fulltext) > 0 Then

ToolCollection/frmNIVerknuepfungen.Designer.vb

@@ -1461,9 +1461,10 @@ Partial Class frmNIVerknuepfungen
         Me.Label27.Font = New System.Drawing.Font("Segoe UI", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
         Me.Label27.Location = New System.Drawing.Point(7, 14)
         Me.Label27.Name = "Label27"
-        Me.Label27.Size = New System.Drawing.Size(120, 13)
+        Me.Label27.Size = New System.Drawing.Size(761, 13)
         Me.Label27.TabIndex = 22
-        Me.Label27.Text = "2. Regular Expression:"
+        Me.Label27.Text = "2. Regular Expression: ACHTUNG: REGEX DARF NUR AUS EINER MATCHING GROUP BESTEHEN," &
+    " DA ES SONST FEHLER BEIM INDEXIEREN VERURSACHT!"
         '
         'GroupBox4
         '