如何给DateTimePicker赋值 能实现一个时间段的查询(10)

date1 :=datetostr(DateTimePicker1.Date); time1 :=timetostr(DateTimePicker2.Date); date2 :=datetostr(DateTimePicker3.Date); time2 :=timetostr(DateTimePicker4.Date);用四个DateTimePicker控件 两个显示日期（年月日） 两个显示时间（时分秒）实现一个时间段内的查询select * from XX where time between XXX and XXX这个XXX 该怎么用DateTimePicker来替换

date1 := date1+' '+ time1;date2 := date2+' '+time2;sql:='select * from xx where time between'+''''+date1+''''+'and '+''''+date2+'''';...呵呵

t1:=formatdatetime('YYYYMMDD',Date1.DateTime)+formatdatetime('HHMMSS',Time1.DateTime); t2:=formatdatetime('YYYYMMDD',Date2.DateTime)+formatdatetime('HHMMSS',Time2.DateTime); query1.ParamByName('XXX1').AsDateTime := strtodatetime(trim(t1)); query1.ParamByName('XXX2').AsDateTime := strtodatetime(trim(t2));未經試驗，你可以試下行不行。

接受答案了.