两个TDateTimePicker组合成新的时间

TDateTimePicker的属性
第一个
Format = "yyyy-MM-dd"
Kind = "dtkDate"
第二个
Format = "HH:mm:ss"
Kind = "dtkTime"

给控件赋初值,如2019-05-13 00:00:00 ，如下：

    dtp1->DateTime =  Now().FormatString("yyyy-MM-dd");
    dtp2->DateTime =  StrToTime("00:00:00");

//分别获取两个控件值：一个是日期,一个是时间,组合成一个新的TDateTime值
TDateTime dt1 = DateToStr(dtp1->DateTime)+" "+dtp2->Time.FormatString("HH:mm:ss");