AppStd/Monorepo
8
1
Fork 0
Code Issues Pull Requests Releases Wiki Activity

DocumentViewer: Trigger GC on done

Browse Source
This commit is contained in:
Jonathan Jenne 2021-06-17 12:58:04 +02:00
parent 8328fb27dc
commit 350ee79274
1 changed files with 7 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
Controls.DocumentViewer/DocumentViewer.vb
View File

@ -69,8 +69,14 @@ 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")
DeleteTempFiles() DeleteTempFiles()
_logger.Debug("Done: Closing Documents")
FreeFile() FreeFile()
_logger.Debug("Done: Triggering GC")
GC.Collect()
End Sub End Sub
''' <summary> ''' <summary>
@ -150,7 +156,7 @@ Public Class DocumentViewer
Private Sub FreeFile() Private Sub FreeFile()
Try Try
If Len(_FilePath) OrElse _Fileinfo Is Nothing Then If Len(_FilePath) = 0 OrElse _Fileinfo Is Nothing Then
Exit Sub Exit Sub
End If End If
Dim oExtension As String = _Fileinfo.Extension.ToUpper Dim oExtension As String = _Fileinfo.Extension.ToUpper