Mein Code:
Termin.Termin.DateTime := StrTODateTime(Concat(DateTOStr(DT_Date.DateTime),' ',TimeTOStr(DT_Time.DateTime)));
@Jim_Raynor:
Verändert diese Plus 1 nicht den Wert? Also kann nicht draus ein anderer Tag entstehen oder so was ähnliches? Irgendwas muss es ja bewirken, bis auf die Lösung des Problems