delphi的一段启动窗体的源程序中有个控制启动窗体时间的,应该这段,但是我看不懂,帮忙解释一下

来源:百度知道 编辑:UC知道 时间:2024/05/14 08:41:00
time1:=now; repeat until time1+StrToTime(‘00:00:1’)<=now;

time1:= now,表示将现在的时间赋给time1
repeat ??? // 应该有段操作的?省略了?
until time1+StrToTime(‘00:00:1’)<=now //这个是条件,直到time1+1秒<=现在的时间就停止repeat 里所做的事情