如何定义时间段？急 在线等

Question

如何定义时间段？急 在线等  我要求定义到昨天的18：00 到今天的18：00

Answer 1

不明白是什么问题。dtTemp1:=(Trunc(now)-1)+Frac(StrToTime('18:00:00'));//昨天18：00
dtTemp2:=(Trunc(now))+Frac(StrToTime('18:00:00'));//今天18：00

Answer 2

 '2008-6-23'<=  Date  <='2008-6-24'

Answer 3

t1,t2: TDateTime
s: string;s:=FormatDateTime('yyyy-mm-dd',date());
今天18：00：t1:=strToDate(s+' '+'18:00:00');
昨天18：00：t2:=t1-1;

Answer 4

StrToDateTime(FormatDateTime('YYYY-MM-DD 18:00:00',Yesterday));//昨天
StrToDateTime(FormatDateTime('YYYY-MM-DD 18:00:00',Now));//今天