DocumentViewer: Better logging

This commit is contained in:
Jonathan Jenne 2022-04-04 13:26:26 +02:00
parent edcb549d55
commit 5ff6a42a2f

View File

@ -69,6 +69,7 @@ Public Class DocumentViewer
''' Terminate Viewer, freeing up resources and deleting temp files ''' Terminate Viewer, freeing up resources and deleting temp files
''' </summary> ''' </summary>
Public Sub Done() Public Sub Done()
Try
_logger.Debug("Done: Deleting Temp Files") _logger.Debug("Done: Deleting Temp Files")
DeleteTempFiles() DeleteTempFiles()
@ -77,6 +78,10 @@ Public Class DocumentViewer
_logger.Debug("Done: Triggering GC") _logger.Debug("Done: Triggering GC")
GC.Collect() GC.Collect()
Catch ex As Exception
_logger.Warn("Error while cleaning up DocumentViewer")
_logger.Error(ex)
End Try
End Sub End Sub
''' <summary> ''' <summary>
@ -125,8 +130,12 @@ Public Class DocumentViewer
End Sub End Sub
Public Sub CloseDocument() Public Sub CloseDocument()
Try
GdViewer.CloseDocument() GdViewer.CloseDocument()
UpdateMainUi() UpdateMainUi()
Catch ex As Exception
_logger.Error(ex)
End Try
End Sub End Sub
Public Sub DeleteTempFiles() Public Sub DeleteTempFiles()
@ -162,13 +171,16 @@ Public Class DocumentViewer
Dim oExtension As String = _Fileinfo.Extension.ToUpper Dim oExtension As String = _Fileinfo.Extension.ToUpper
Select Case _ViewerMode Select Case _ViewerMode
Case ViewerMode.RichText Case ViewerMode.RichText
_logger.Debug("Closing RichText Editor")
RichEditControl1.CreateNewDocument() RichEditControl1.CreateNewDocument()
Case ViewerMode.Excel Case ViewerMode.Excel
_logger.Debug("Closing Excel Editor")
SpreadsheetControl1.CreateNewDocument() SpreadsheetControl1.CreateNewDocument()
Case Else Case Else
GdViewer.CloseDocument() _logger.Debug("Closing GDPicture Viewer")
GdViewer.Dispose()
End Select End Select
Catch ex As Exception Catch ex As Exception