Question

delphi中，如何将now函数加上一分钟

DateTimePicker1.Time:=now;这是我写的代码，但只能获取当前时间，我需要在当前时间上加多一分钟，怎么写？要求不要改变系统默认的时间格式。

Answer 1

delphi....忘了，DateTimePicker1.Time = 分开搞吧，把Now切换成时分秒，在加上1分钟，再组合。

Answer 2

i:=1;DateTimePicker1.Time:=now+strtotime('0:'+inttostr(i)+':0');