really fix bool conversion

This commit is contained in:
Jonathan Jenne 2020-04-22 14:30:06 +02:00
parent 07a5c2748b
commit 0ef9397f73

View File

@ -1240,7 +1240,7 @@ Public Class ClassWindream
'Das Array anpassen 'Das Array anpassen
ReDim Preserve ValueArray(Anzahl) ReDim Preserve ValueArray(Anzahl)
'Den Wert im Array speichern 'Den Wert im Array speichern
ValueArray(Anzahl) = NewValue.ToString ValueArray(Anzahl) = NewValue '.ToString
Anzahl += 1 Anzahl += 1
Else Else
LOGGER.Info(" >> Value '" & NewValue.ToString & "' bereits in Array enthalten") LOGGER.Info(" >> Value '" & NewValue.ToString & "' bereits in Array enthalten")
@ -1249,7 +1249,7 @@ Public Class ClassWindream
'Das Array anpassen 'Das Array anpassen
ReDim Preserve ValueArray(Anzahl) ReDim Preserve ValueArray(Anzahl)
'Den Wert im Array speichern 'Den Wert im Array speichern
ValueArray(Anzahl) = NewValue.ToString ValueArray(Anzahl) = NewValue '.ToString
Anzahl += 1 Anzahl += 1
End If End If
@ -1767,7 +1767,7 @@ Public Class ClassWindream
End Function End Function
Private Shared Function ToBoolean(input As String) Private Shared Function ToBoolean(input As String) As Boolean
If String.IsNullOrEmpty(input) Then Return False If String.IsNullOrEmpty(input) Then Return False
Return (input.Trim().ToLower() = "true") OrElse (input.Trim() = "1") Return (input.Trim().ToLower() = "true") OrElse (input.Trim() = "1")
End Function End Function