Merge branch 'master' of http://SchreiberM@172.24.11.74:90/scm/git/RecordOrganizer
This commit is contained in:
commit
3eac89a9a3
@ -32,7 +32,7 @@ Public Class ClassControlValues
|
||||
|
||||
Case GetType(DevExpress.XtraEditors.DateEdit)
|
||||
Dim datepicker As DevExpress.XtraEditors.DateEdit = DirectCast(control, DevExpress.XtraEditors.DateEdit)
|
||||
If IsDBNull(datepicker.EditValue) Then
|
||||
If IsDBNull(datepicker.EditValue) Or datepicker.EditValue = DateTime.MinValue Then
|
||||
Return False
|
||||
Else
|
||||
Return True
|
||||
@ -627,8 +627,7 @@ Public Class ClassControlValues
|
||||
DirectCast(control, RadioButton).Checked = False
|
||||
|
||||
Case GetType(DevExpress.XtraEditors.DateEdit)
|
||||
DirectCast(control, DevExpress.XtraEditors.DateEdit).DateTime = Now
|
||||
|
||||
DirectCast(control, DevExpress.XtraEditors.DateEdit).DateTime = DateTime.MinValue
|
||||
Case GetType(PictureBox)
|
||||
DirectCast(control, PictureBox).BackgroundImage = Nothing
|
||||
|
||||
|
||||
Loading…
x
Reference in New Issue
Block a user