关于时间问题？

[lumina]

我想要TempTime等于某一个时间段就执行一段代码，以下写可不可以。急急啊。。
var TempTime : TdataTime;

TempTime ;= Time;

if TempTime[1] in ['8:00:00'...'10:00:00']
begin
代码部分
end;

[blazingfire]

if (TempTime[1]>=StrToTime('8:00:00')) and
(TempTime[1]<=StrToTime('10:00:00')) then
//......

[mikesu]

应该是的！

[mikesu]

好象不行！你要不断的更新你的TempTime。
要不试一下
if (StartTime<Time)and(EndTime>Time)
begin
end;

[mikesu]

StartTime,EndTime 要自己定义！

[hongqi162]

代码不对！上面的提示可以
你试一试！

[lumina]

To mikesu(mikesu)
多谢你哦，
定义是不是这样：
Var StartTime,EndTime : TDataTime;

StartTime := StrToTime('8:00:00');
EndTime := StrToTime('10:00:00');