AppStd/RecordOrganizer
8
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

jj 22.03

Browse Source
This commit is contained in:
JenneJ 2017-03-22 15:45:55 +01:00
parent f4b61df91e
commit 0d7ad73c35
1 changed files with 2 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
app/DD-Record-Organizer/ClassControlValues.vb
View File

@ -32,7 +32,7 @@ Public Class ClassControlValues
Case GetType(DevExpress.XtraEditors.DateEdit) Case GetType(DevExpress.XtraEditors.DateEdit)
Dim datepicker As DevExpress.XtraEditors.DateEdit = DirectCast(control, 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 Return False
Else Else
Return True Return True
@ -622,8 +622,7 @@ Public Class ClassControlValues
DirectCast(control, RadioButton).Checked = False DirectCast(control, RadioButton).Checked = False
Case GetType(DevExpress.XtraEditors.DateEdit) Case GetType(DevExpress.XtraEditors.DateEdit)
DirectCast(control, DevExpress.XtraEditors.DateEdit).DateTime = Now DirectCast(control, DevExpress.XtraEditors.DateEdit).DateTime = DateTime.MinValue
Case GetType(PictureBox) Case GetType(PictureBox)
DirectCast(control, PictureBox).BackgroundImage = Nothing DirectCast(control, PictureBox).BackgroundImage = Nothing