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

Allow checkboxes to be required

Browse Source
This commit is contained in:
Jonathan Jenne 2021-11-03 15:13:21 +01:00
parent 3cd2bad3fa
commit a78845f02d
1 changed files with 310 additions and 296 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

22
app/DD_PM_WINDREAM/frmValidator.vb
View File

@ -3214,8 +3214,7 @@ Public Class frmValidator
Exit Select
Else
LOGGER.Debug("No Default Value for Checkbox - so using false!")
myCheckBox.Checked = False
myCheckBox.CheckState = CheckState.Unchecked
myCheckBox.CheckState = CheckState.Indeterminate
End If
@ -4616,6 +4615,7 @@ Public Class frmValidator
End Try
Case "System.Windows.Forms.DateTimePicker"
Try
Dim dtp As DateTimePicker = oControl
'Wenn kein Wert ausgewählt wurde und der Index aber gesetzt werden muss
If oIsRequired = True And dtp.Value.ToString = String.Empty Then
@ -4684,7 +4684,12 @@ Public Class frmValidator
Else
LOGGER.Debug("DateValue is 01.01.0001 00:00:00")
End If
Catch ex As Exception
LOGGER.Error(ex)
End Try
Case "System.Windows.Forms.CheckBox"
Try
Dim chk As CheckBox = oControl
oMyInput = chk.Checked.ToString
@ -4775,10 +4780,12 @@ Public Class frmValidator
End If
End If
Catch ex As Exception
LOGGER.Error(ex)
End Try
Case "System.Windows.Forms.DataGridView"
Try
Dim dgv As DataGridView = oControl
Dim Zeilen As Integer = 0
@ -4854,8 +4861,12 @@ Public Class frmValidator
End If
'Jetzt die Datei indexieren
End If
Catch ex As Exception
LOGGER.Error(ex)
End Try
Case "DevExpress.XtraGrid.GridControl"
Try
Dim dgv As GridControl = oControl
Dim oRowCount As Integer = dgv.DataSource.Rows.Count
@ -4971,6 +4982,9 @@ Public Class frmValidator
End If
End If
Catch ex As Exception
LOGGER.Error(ex)
End Try
End Select
End If 'End If für Control und ReadOnly = False
Next