给位好心的人帮个忙关于时间相加的

您所在位置：社区首页 — Delphi讨论区 — 给位好心的人帮个忙关于时间相加的

主题：给位好心的人帮个忙关于时间相加的

克里斯 [专家分：0] 发布于 2006-11-25 10:07:00

怎么样让日期自己加一啊
就是比如说是今天日期加一天变成明天的日期
谢谢了各位

沙发

lanjping [专家分：270] 发布于 2006-11-25 13:14:00

var
_date : Tdate;
begin
_date:=strtodate('2006-11-25');
edit1.Text:=datetostr(_date+1);
end;
或者用now+1也可以啊

板凳

长尾兔 [专家分：3630] 发布于 2006-11-27 16:31:00

用IncDay()函数啊,呵呵

//uses dateutils;

NewDate:=IncDay(OldDate,1);

3 楼

comwang [专家分：0] 发布于 2006-12-06 21:42:00

用IncDay()函数啊,呵呵

//uses dateutils;

NewDate:=IncDay(OldDate,1);
这个挺好！！！
[em11]

您尚未登录，请登录后再回复。点此登录或注册