AppStd/Modules
8
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

DocumentViewer: Better logging

Browse Source
This commit is contained in:
Jonathan Jenne 2022-04-04 13:26:26 +02:00
parent edcb549d55
commit 5ff6a42a2f
1 changed files with 21 additions and 9 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

30
Controls.DocumentViewer/DocumentViewer.vb
View File

@ -69,14 +69,19 @@ 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()
_logger.Debug("Done: Deleting Temp Files") Try
DeleteTempFiles() _logger.Debug("Done: Deleting Temp Files")
DeleteTempFiles()
_logger.Debug("Done: Closing Documents") _logger.Debug("Done: Closing Documents")
FreeFile() FreeFile()
_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()
GdViewer.CloseDocument() Try
UpdateMainUi() GdViewer.CloseDocument()
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