Neue Methode und Muster hinzugefügt, Versionen aktualisiert

Die Methode `CleanupTempFolder` wurde in `DocumentPathHandler.vb` hinzugefügt, um temporäre Dateien zu bereinigen.
In `AssemblyInfo.vb` wurden Copyright-Jahr und Versionen aktualisiert (u.a. auf `2.0.0.0`, `1.4.0.0`, `1.5.0.0`).
Ein neues Muster `PATTERN_TBCOL` wurde in `Patterns.vb` hinzugefügt und in die entsprechenden Listen aufgenommen.
In `SettingsState.vb` wurde das Feld `SavetoDrive` ergänzt.

Base/DocumentPathHandler.vb

@@ -55,6 +55,52 @@ Public Class DocumentPathHandler
             Return False
         End Try
     End Function
+    Public Sub CleanupTempFolder()
+        Try
+            If String.IsNullOrEmpty(TEMP_DOCUMENT_FOLDER) Then
+                _Logger.Debug("TEMP_DOCUMENT_FOLDER ist nicht gesetzt → Kein Cleanup erforderlich")
+                Return
+            End If
+
+            If Not System.IO.Directory.Exists(TEMP_DOCUMENT_FOLDER) Then
+                _Logger.Debug($"Temp-Ordner [{TEMP_DOCUMENT_FOLDER}] existiert nicht → Kein Cleanup erforderlich")
+                Return
+            End If
+
+            ' Alle Dateien im Ordner ermitteln
+            Dim files As String() = System.IO.Directory.GetFiles(TEMP_DOCUMENT_FOLDER)
+
+            If files.Length = 0 Then
+                _Logger.Debug($"Temp-Ordner [{TEMP_DOCUMENT_FOLDER}] ist bereits leer")
+                Return
+            End If
+
+            ' Alle Dateien löschen
+            Dim deletedCount As Integer = 0
+            Dim errorCount As Integer = 0
+
+            For Each filePath As String In files
+                Try
+                    System.IO.File.Delete(filePath)
+                    deletedCount += 1
+                    _Logger.Debug($"Datei gelöscht: [{System.IO.Path.GetFileName(filePath)}]")
+                Catch fileEx As Exception
+                    errorCount += 1
+                    _Logger.Warn($"⚠️ Datei konnte nicht gelöscht werden: [{System.IO.Path.GetFileName(filePath)}] - {fileEx.Message}")
+                End Try
+            Next
+
+            If errorCount = 0 Then
+                _Logger.Debug($"✓ Temp-Ordner bereinigt: {deletedCount} Datei(en) gelöscht")
+            Else
+                _Logger.Warn($"⚠️ Temp-Ordner teilweise bereinigt: {deletedCount} gelöscht, {errorCount} Fehler")
+            End If
+
+        Catch ex As Exception
+            _Logger.Error($"❌ Fehler beim Bereinigen des Temp-Ordners: {ex.Message}")
+            _Logger.Error(ex)
+        End Try
+    End Sub
     ''' <summary>
     ''' Verarbeitet einen Dokumentenpfad: Optional Mapping, dann Temp-Kopie
     ''' </summary>

Base/My Project/AssemblyInfo.vb

@@ -12,8 +12,8 @@ Imports System.Runtime.InteropServices
 <Assembly: AssemblyDescription("basisfunktionalitäten für DigitalData Anwendungen")>
 <Assembly: AssemblyCompany("Digital Data GmbH")>
 <Assembly: AssemblyProduct("Modules.")>
-<Assembly: AssemblyCopyright("Copyright © 2025")>
+<Assembly: AssemblyCopyright("Copyright © 2026")>
-<Assembly: AssemblyTrademark("1.3.9.0")>
+<Assembly: AssemblyTrademark("")>
 
 <Assembly: ComVisible(False)>
 
@@ -31,5 +31,5 @@ Imports System.Runtime.InteropServices
 ' indem Sie "*" wie unten gezeigt eingeben:
 ' <Assembly: AssemblyVersion("1.0.*")>
 
-<Assembly: AssemblyVersion("1.4.0.0")>
+<Assembly: AssemblyVersion("2.0.0.0")>
-<Assembly: AssemblyFileVersion("1.4.0.0")>
+<Assembly: AssemblyFileVersion("2.0.0.0")>

Patterns/My Project/AssemblyInfo.vb

@@ -31,5 +31,5 @@ Imports System.Runtime.InteropServices
 ' übernehmen, indem Sie "*" eingeben:
 ' <Assembly: AssemblyVersion("1.0.*")>
 
-<Assembly: AssemblyVersion("1.3.1.0")>
+<Assembly: AssemblyVersion("1.4.0.0")>
-<Assembly: AssemblyFileVersion("1.3.1.0")>
+<Assembly: AssemblyFileVersion("1.4.0.0")>

Patterns/Patterns.vb

@@ -20,6 +20,7 @@ Public Class ClassPatterns
     ' Complex patterns that rely on a datasource like a Database or Windream
     Public Const PATTERN_WMI = "WMI"
     Public Const PATTERN_CTRL = "CTRL"
+    Public Const PATTERN_TBCOL = "TBCOL"
     ' Simple patterns that only rely on .NET functions
     Public Const PATTERN_INT = "INT"
     ' Simple patterns that rely on Data from the TBDD_USER table
@@ -63,8 +64,8 @@ Public Class ClassPatterns
     Private ReadOnly _LogConfig As LogConfig
 
     Private ReadOnly _Regex As Regex = New Regex("{#(\w+)#([\w\s_-]+)}+")
-    Private ReadOnly _AllPatterns As New List(Of String) From {PATTERN_WMI, PATTERN_CTRL, PATTERN_USER, PATTERN_INT, PATTERN_WMDOCID, PATTERN_IDBOBJID}
+    Private ReadOnly _AllPatterns As New List(Of String) From {PATTERN_WMI, PATTERN_CTRL, PATTERN_TBCOL, PATTERN_USER, PATTERN_INT, PATTERN_WMDOCID, PATTERN_IDBOBJID}
-    Private ReadOnly _ComplexPatterns As New List(Of String) From {PATTERN_WMI, PATTERN_CTRL}
+    Private ReadOnly _ComplexPatterns As New List(Of String) From {PATTERN_WMI, PATTERN_CTRL, PATTERN_TBCOL}
     Private ReadOnly _SimplePatterns As New List(Of String) From {PATTERN_USER, PATTERN_INT}
 
     ''' <summary>

ZooFlow/My Project/AssemblyInfo.vb

@@ -13,7 +13,7 @@ Imports System.Runtime.InteropServices
 <Assembly: AssemblyCompany("")>
 <Assembly: AssemblyProduct("ZooFlow")>
 <Assembly: AssemblyCopyright("Copyright © 2022")>
-<Assembly: AssemblyTrademark("1.3.0.0")>
+<Assembly: AssemblyTrademark("")>
 
 <Assembly: ComVisible(False)>
 
@@ -31,5 +31,5 @@ Imports System.Runtime.InteropServices
 ' übernehmen, indem Sie "*" eingeben:
 ' <Assembly: AssemblyVersion("1.0.*")>
 
-<Assembly: AssemblyVersion("1.4.0.0")>
+<Assembly: AssemblyVersion("1.5.0.0")>
-<Assembly: AssemblyFileVersion("1.4.0.0")>
+<Assembly: AssemblyFileVersion("1.5.0.0")>

ZooFlow/State/SettingsState.vb

@@ -5,5 +5,6 @@
         Public WM_SUFFIX As String = "\\WINDREAM\OBJECTS"
         Public MAP_SHAREDRIVE As String = ""
         Public MAP_BLACKLIST As String = ""
+        Public SavetoDrive As Boolean = False
     End Class
 End Namespace