DocumentResultList: fix notnull calls

This commit is contained in:
Jonathan Jenne 2023-08-07 09:37:59 +02:00
parent 64a81eef17
commit 4a79761118

View File

@ -13,7 +13,6 @@ Imports DevExpress.XtraPrinting
Imports DigitalData.Modules.Config
Imports DigitalData.Modules.EDMI.API
Imports DigitalData.Modules.EDMI.API.EDMIServiceReference
Imports DigitalData.Modules.Language
Imports DigitalData.Modules.Logging
Imports DigitalData.Modules.ZooFlow
Imports DigitalData.Modules.ZooFlow.Constants
@ -117,7 +116,7 @@ Public Class frmDocumentResultList
Logger = pLogConfig.GetLogger()
FormHelper = New FormHelper(pLogConfig, Me)
UserLanguage = Utils.NotNull(Environment.User.Language, State.UserState.LANG_EN_US)
UserLanguage = ObjectEx.NotNull(Environment.User.Language, State.UserState.LANG_EN_US)
LanguageEx.LogApplicationLanguage(Logger)
LanguageEx.SetApplicationLanguage(Logger, UserLanguage)
@ -787,7 +786,7 @@ Public Class frmDocumentResultList
If oActiveGrid IsNot Nothing Then
Dim oGridBand = _ActiveGridBand
XtraSaveFileDialog.FileName = Utils.ConvertTextToSlug(oGridBand.Caption) & ".xlsx"
XtraSaveFileDialog.FileName = StringEx.ConvertTextToSlug(oGridBand.Caption) & ".xlsx"
XtraSaveFileDialog.DefaultExt = ".xlsx"
If XtraSaveFileDialog.ShowDialog() = Windows.Forms.DialogResult.OK Then
@ -931,7 +930,7 @@ Public Class frmDocumentResultList
Private Sub MenuItem_CopyFilepath_ItemClick(sender As Object, e As ItemClickEventArgs) Handles MenuItemFilepathCopy.ItemClick
If _CurrentDocument IsNot Nothing Then
Dim oPath = Utils.NotNull(_CurrentDocument.FullPath, "")
Dim oPath = ObjectEx.NotNull(_CurrentDocument.FullPath, "")
If oPath <> String.Empty Then
Clipboard.SetText(oPath)
End If