var DateTime:TDateTime;
begin
DateTime:=Now;
DateTime:=DateTime1+1;//得到明天此时
end;
begin
DateTime:=Now;
DateTime:=DateTime1+1;//得到明天此时
end;
解决方案 »
- datachange中DBGrid统计求和问题
- 如何得知程序创建了新的窗口实例,并获取该窗口实例?
- delphi 文件夹权限设置
- 关于程序(文本)的解析,高手进来看看.
- 求救:delphi2005里,Inttostr()这样的函数怎么写?
- 请教:如何把一个已打开的WORD文档赋值给一个TWordDocument类型的变量?
- 各位能不能说说实现象Microsoft PowerPoint那样的幻灯片播放的思路
- 请问如何操作memo中的某行?
- 想用Delphi实现Web用户数量的限制,请高手提供帮助,谢谢。
- Access+Delphi的SQL语句问题?
- Borland首席设计师去了微软,会不会象当年乔丹离开公牛?不知Borland的结局会不会象现在的公牛?Delphi程序员们有何看法?
- 关于borland(大家过来看看!!)
SQL语句中?(什么数据库?)
Delphi中?(什么版本?)
我要用DELPHI
LAST RECORD:2000-01-01
要显示:2000-02-01;或2001-01-01
是月,年,日,增加,有函数吗,
thank you
"C:\Program Files\Borland\Delphi5\Source\Samples\calendar.pas"
上有,去看看
incDay(Date(),5);
incMonth(Date(),5);
incYear()
begin
DateTime:=Now;
DateTime:=DateTime1+1;//得到明天此时
end;
增加月IncMonth(DateTime,1);//第二个参数可以是任意个月
增加年IncMonth(DateTime,12);
IncYear在Delphi6中有,Delphi5中没有。
DECODETIME(NOW,YEAR,MONTH,DAY).
然后处理
怪不得俺在回到d5中编程时找不到。