diff --git a/app/TaskFlow/frmValidator.vb b/app/TaskFlow/frmValidator.vb index cd5db57..1df8faf 100644 --- a/app/TaskFlow/frmValidator.vb +++ b/app/TaskFlow/frmValidator.vb @@ -2914,7 +2914,16 @@ Public Class frmValidator ' Load Document in Document Viewer Dim oFileName = $"{CURRENT_DOC_ID}.{Current_Document.Extension}" If Not IsNothing(DocumentViewer1) Then - DocumentViewer1.LoadFile(oFileName, New MemoryStream(Current_Document.Contents)) + If (OPERATION_MODE_FS = ClassConstants.OpModeFS_PWM Or OPERATION_MODE_FS = ClassConstants.OpModeFS_IDBWM) Then + DocumentViewer1.LoadFile(Current_Document.FullPath) + 'Erstmal auskommentiert + 'DocumentViewer1.LoadFile(oFileName, New MemoryStream(Current_Document.Contents)) + Else + 'DocumentViewer1.LoadFile(oFileName, New MemoryStream(Current_Document.Contents)) + + + End If + DocumentViewer1.RightOnlyView(USER_RIGHT_VIEW_ONLY) 'war auskommentiert.....WARUM? End If