Compare commits
3 Commits
540f9bcc12
...
0f518ec8e7
| Author | SHA1 | Date | |
|---|---|---|---|
|
|
0f518ec8e7 | ||
|
|
f2bb6d8380 | ||
|
|
21d045616e |
@@ -886,35 +886,6 @@ Namespace ControlCreator
|
|||||||
_Logger.Error(ex)
|
_Logger.Error(ex)
|
||||||
End Try
|
End Try
|
||||||
End Sub
|
End Sub
|
||||||
' *** NEU: Visuelle Kennzeichnung für dynamische Editoren ***
|
|
||||||
AddHandler pGridView.CustomDrawCell,
|
|
||||||
Sub(sender As Object, e As RowCellCustomDrawEventArgs)
|
|
||||||
Try
|
|
||||||
' Nur für dynamische Editor-Spalten
|
|
||||||
If Not _DynamicEditorColumns.Contains(e.Column.FieldName) Then Return
|
|
||||||
|
|
||||||
' Zellwert abrufen
|
|
||||||
Dim cellValue = pGridView.GetRowCellValue(e.RowHandle, e.Column.FieldName)
|
|
||||||
|
|
||||||
' Wenn Zelle LEER ist → grau einfärben
|
|
||||||
If cellValue Is Nothing OrElse IsDBNull(cellValue) OrElse String.IsNullOrWhiteSpace(cellValue.ToString()) Then
|
|
||||||
' Helles Grau als Hintergrund
|
|
||||||
e.Appearance.BackColor = Color.FromArgb(240, 240, 240)
|
|
||||||
e.Appearance.ForeColor = Color.Gray
|
|
||||||
Else
|
|
||||||
' Wert vorhanden → Standardfarbe (nur bei Fokus-Wechsel)
|
|
||||||
' WICHTIG: Nicht überschreiben, wenn Zelle selektiert ist!
|
|
||||||
If Not e.Appearance.BackColor.Equals(SystemColors.Highlight) Then
|
|
||||||
e.Appearance.BackColor = Color.White
|
|
||||||
e.Appearance.ForeColor = Color.Black
|
|
||||||
End If
|
|
||||||
End If
|
|
||||||
|
|
||||||
Catch ex As Exception
|
|
||||||
_Logger.Error("[CustomDrawCell] Error: {0}", ex.Message)
|
|
||||||
_Logger.Error(ex)
|
|
||||||
End Try
|
|
||||||
End Sub
|
|
||||||
AddHandler pGridView.ValidatingEditor, Sub(sender As Object, e As BaseContainerValidateEditorEventArgs)
|
AddHandler pGridView.ValidatingEditor, Sub(sender As Object, e As BaseContainerValidateEditorEventArgs)
|
||||||
Dim oRow As DataRowView = pGridView.GetRow(pGridView.FocusedRowHandle)
|
Dim oRow As DataRowView = pGridView.GetRow(pGridView.FocusedRowHandle)
|
||||||
Dim oColumnName = pGridView.FocusedColumn.FieldName
|
Dim oColumnName = pGridView.FocusedColumn.FieldName
|
||||||
|
|||||||
@@ -3929,14 +3929,14 @@ Public Class frmValidator
|
|||||||
If COPY_WMFILE_2TEMP = True Then
|
If COPY_WMFILE_2TEMP = True Then
|
||||||
' Optionen konfigurieren
|
' Optionen konfigurieren
|
||||||
Dim options As New DocumentPathHandler.DocumentPathOptions With {
|
Dim options As New DocumentPathHandler.DocumentPathOptions With {
|
||||||
.EnableMapping = True,
|
.EnableMapping = True,
|
||||||
.WMSuffix = WMSUFFIX,
|
.WMSuffix = WMSUFFIX,
|
||||||
.SpecificDrive = If(Len(MAP_SHARE_DRIVE) = 1, MAP_SHARE_DRIVE, ""),
|
.SpecificDrive = If(Len(MAP_SHARE_DRIVE) = 1, MAP_SHARE_DRIVE, ""),
|
||||||
.DriveBlacklist = MAP_BLACKLIST,
|
.DriveBlacklist = MAP_BLACKLIST,
|
||||||
.CopyToTemp = True,
|
.CopyToTemp = True,
|
||||||
.TempFolder = TEMP_DOCUMENT_FOLDER,
|
.TempFolder = TEMP_DOCUMENT_FOLDER,
|
||||||
.UnmapAfterCopy = True
|
.UnmapAfterCopy = True
|
||||||
}
|
}
|
||||||
|
|
||||||
' Verarbeiten
|
' Verarbeiten
|
||||||
Dim result = _documentPathHandler.ProcessDocumentPath(oFilePath_from_DB, options)
|
Dim result = _documentPathHandler.ProcessDocumentPath(oFilePath_from_DB, options)
|
||||||
@@ -3949,6 +3949,7 @@ Public Class frmValidator
|
|||||||
DocPathWindows = result.FinalPath
|
DocPathWindows = result.FinalPath
|
||||||
WMDocPathWindows = oFilePath_from_DB
|
WMDocPathWindows = oFilePath_from_DB
|
||||||
MyValidationLogger.Info($"✓ Dokument verarbeitet: [{Path.GetFileName(result.FinalPath)}]")
|
MyValidationLogger.Info($"✓ Dokument verarbeitet: [{Path.GetFileName(result.FinalPath)}]")
|
||||||
|
|
||||||
Else
|
Else
|
||||||
MyValidationLogger.Warn($"⚠️ Dokumentpfad-Verarbeitung fehlgeschlagen: {result.ErrorMessage}")
|
MyValidationLogger.Warn($"⚠️ Dokumentpfad-Verarbeitung fehlgeschlagen: {result.ErrorMessage}")
|
||||||
MyValidationLogger.Warn($"⚠️ Fallback auf Originalpfad: [{oFilePath_from_DB}]")
|
MyValidationLogger.Warn($"⚠️ Fallback auf Originalpfad: [{oFilePath_from_DB}]")
|
||||||
@@ -3962,6 +3963,7 @@ Public Class frmValidator
|
|||||||
Return False
|
Return False
|
||||||
End If
|
End If
|
||||||
End If
|
End If
|
||||||
|
CURRENT_DOC_PATH = WMDocPathWindows
|
||||||
Else
|
Else
|
||||||
DocPathWindows = oFilePath_from_DB
|
DocPathWindows = oFilePath_from_DB
|
||||||
MyValidationLogger.Info($"📄 Verwende Originalpfad: [{oFilePath_from_DB}]")
|
MyValidationLogger.Info($"📄 Verwende Originalpfad: [{oFilePath_from_DB}]")
|
||||||
|
|||||||
Reference in New Issue
Block a user