diff --git a/GUIs.ZooFlow/Administration/ClassDetailPage.vb b/GUIs.ZooFlow/Administration/ClassDetailPage.vb index e19ad4ce..9f085088 100644 --- a/GUIs.ZooFlow/Administration/ClassDetailPage.vb +++ b/GUIs.ZooFlow/Administration/ClassDetailPage.vb @@ -2,6 +2,7 @@ Imports DevExpress.XtraEditors Imports DevExpress.XtraLayout Imports DevExpress.XtraTab +Imports DigitalData.Modules.Language.Utils Public Class ClassDetailPages Public Items As New Dictionary(Of String, DetailPage) @@ -62,7 +63,7 @@ Public Class ClassDetailPages Dim oNullable As Boolean = oColumn.AllowDBNull - If oNullable = False And NotNull(oControl.EditValue, String.Empty) = String.Empty Then + If oNullable = False And NotNull(oControl.EditValue.ToString, String.Empty) = String.Empty Then Throw New NoNullAllowedException() End If End If diff --git a/GUIs.ZooFlow/Administration/frmAdmin_Start.vb b/GUIs.ZooFlow/Administration/frmAdmin_Start.vb index c232565e..f3ffb605 100644 --- a/GUIs.ZooFlow/Administration/frmAdmin_Start.vb +++ b/GUIs.ZooFlow/Administration/frmAdmin_Start.vb @@ -4,6 +4,7 @@ Imports DevExpress.XtraEditors.Repository Imports DevExpress.XtraGrid.Columns Imports DevExpress.XtraGrid.Views.Grid Imports DigitalData.Modules.Logging +Imports DigitalData.Modules.Language.Utils Imports DigitalData.GUIs.ZooFlow.Administration.ClassConstants Imports DevExpress.XtraGrid diff --git a/GUIs.ZooFlow/ClassDataASorDB.vb b/GUIs.ZooFlow/ClassDataASorDB.vb index 5b0d2267..7458c820 100644 --- a/GUIs.ZooFlow/ClassDataASorDB.vb +++ b/GUIs.ZooFlow/ClassDataASorDB.vb @@ -1,5 +1,6 @@ Imports DigitalData.Modules.EDMI.API.EDMIServiceReference Imports DigitalData.Modules.Logging +Imports DigitalData.Modules.Language.Utils Public Class ClassDataASorDB Private _Logger As Logger diff --git a/GUIs.ZooFlow/Globix/frmGlobix_Index.vb b/GUIs.ZooFlow/Globix/frmGlobix_Index.vb index 8f6ee03b..acab15d2 100644 --- a/GUIs.ZooFlow/Globix/frmGlobix_Index.vb +++ b/GUIs.ZooFlow/Globix/frmGlobix_Index.vb @@ -7,6 +7,7 @@ Imports System.Security.Principal Imports System.Text.RegularExpressions Imports DigitalData.GUIs.GlobalIndexer Imports DigitalData.Modules.Logging +Imports DigitalData.Modules.Language.Utils Imports DigitalData.Controls.LookupGrid Imports Independentsoft diff --git a/GUIs.ZooFlow/ModuleHelpers.vb b/GUIs.ZooFlow/ModuleHelpers.vb index f3892991..d3bf200f 100644 --- a/GUIs.ZooFlow/ModuleHelpers.vb +++ b/GUIs.ZooFlow/ModuleHelpers.vb @@ -2,19 +2,6 @@ Imports System.Text.RegularExpressions Module ModuleHelpers - ''' - ''' Überprüft einen Wert auf verschiedene Arten von "Null" und gibt einen Standard-Wert zurück, wenn der Wert "Null" ist. - ''' - ''' Der zu überprüfende Wert - ''' Der Standard Wert - ''' value oder wenn dieser "Null" ist, defaultValue - Public Function NotNull(Of T)(ByVal value As T, ByVal defaultValue As T) As T - If IsNothing(value) OrElse String.IsNullOrEmpty(value.ToString) OrElse IsDBNull(value) Then - Return defaultValue - Else - Return value - End If - End Function Public Function encode_utf8(ByVal str As String) As String Try 'supply True as the construction parameter to indicate diff --git a/GUIs.ZooFlow/frmFlowForm.vb b/GUIs.ZooFlow/frmFlowForm.vb index 418e6f9c..c4cf7d21 100644 --- a/GUIs.ZooFlow/frmFlowForm.vb +++ b/GUIs.ZooFlow/frmFlowForm.vb @@ -8,6 +8,7 @@ Imports DigitalData.GUIs.ZooFlow.ClassConstants Imports DigitalData.GUIs.ZooFlow.ClipboardWatcher Imports DigitalData.Modules Imports DigitalData.Modules.Logging +Imports DigitalData.Modules.Language.Utils Imports DigitalData.Modules.Messaging Imports DigitalData.Modules.Windows