Zooflow: Fix messageboxes without title

This commit is contained in:
Jonathan Jenne
2022-05-23 15:07:07 +02:00
parent ce7261acca
commit 39c69704f4
56 changed files with 683 additions and 432 deletions

View File

@@ -31,7 +31,6 @@ Public Class frmDocumentResultList
' Interface implementations
Private ReadOnly Property LogConfig As LogConfig Implements IBaseForm.LogConfig
Private ReadOnly Property Logger As Logger Implements IBaseForm.Logger
Public ReadOnly Property ErrorHandler As BaseErrorHandler Implements IBaseForm.ErrorHandler
Public Property ShouldReturnToPreviousForm As Boolean = False Implements IResultForm.ShouldReturnToPreviousForm
' Helper Classes
@@ -48,6 +47,7 @@ Public Class frmDocumentResultList
Private ReadOnly Helpers As DocumentResultList.Helpers
Private ReadOnly Params As Params
Private ReadOnly LayoutManager As Layout
Private ReadOnly FormHelper As FormHelper
Private WithEvents Watcher As Watcher
' Runtime variables
@@ -97,7 +97,7 @@ Public Class frmDocumentResultList
LogConfig = pLogConfig
Logger = pLogConfig.GetLogger()
ErrorHandler = New BaseErrorHandler(pLogConfig, Me)
FormHelper = New FormHelper(pLogConfig, Me)
Environment = pEnvironment
Params = pParams
@@ -228,7 +228,7 @@ Public Class frmDocumentResultList
End If
Catch ex As Exception
ErrorHandler.ShowErrorMessage(ex, "Form Load", "Error while loading results")
FormHelper.ShowErrorMessage(ex, "Error while loading results")
Finally
IsLoading = False
@@ -288,7 +288,7 @@ Public Class frmDocumentResultList
DocumentViewer1.LoadFile(oFileName, New MemoryStream(oDocument.Contents))
If IsNothing(oDocument) Then
DocumentViewer1.CloseDocument()
ErrorHandler.ShowErrorMessage("File could not be loaded!")
FormHelper.ShowErrorMessage("File could not be loaded!", "GridView_FocusedRowChanged")
Exit Sub
End If
@@ -310,7 +310,7 @@ Public Class frmDocumentResultList
UpdateRibbonActions(Nothing)
End If
Catch ex As Exception
ErrorHandler.ShowErrorMessage(ex, "GridView_FocusedRowChanged")
FormHelper.ShowErrorMessage(ex, "GridView_FocusedRowChanged")
Finally
Cursor = Cursors.Default
End Try
@@ -400,7 +400,7 @@ Public Class frmDocumentResultList
End If
Catch ex As Exception
ErrorHandler.ShowErrorMessage(ex, "Watcher_FileChanged")
FormHelper.ShowErrorMessage(ex, "Watcher_FileChanged")
Finally
' Signal to the watcher that the file is no longer in use