| 技术论坛 |
|
|
| ≡技术区≡ ① |
| DELPHI技术 |
| lazarus/fpc/Free Pascal |
| 移动应用开发 |
| Web应用开发 |
| 数据库专区 |
| 报表专区 |
| 网络通讯 |
| 开源项目 |
| 论坛精华贴 |
| ≡发布区≡ ② |
| 发布代码 |
| 发布控件 |
| 文档资料 |
| 经典工具 |
| ≡事务区≡ ③ |
| 网站意见 |
| 盒子之家 |
| 招聘应聘 |
| 信息交换 |
| 论坛信息 |
|||
|
| 导航： | 论坛 -> DELPHI技术 斑竹:liumazi,sephil | |||||
| 作者： |
|
2003/12/6 8:55:53 | ||||
| 标题： |
|
加入我的收藏 | ||||
| 楼主： | 如何使日期自动加1,比如: 假设Tdate为日期变量且为2003-12-06,可否这样:Tdate+1则日期为2003-12-07,如果Tdate+31则日期为2004-01-06呢?? 有什么方法可以实现?? ---------------------------------------------- *-------------------------------\ | 渴求知识，也渴望您的帮助！ \ | 愿结识当今天下爱好DELPHI之朋友！\ |__________________________________\______^_^ |
|||||
| 作者： |
|
2003/12/6 11:10:45 | ||||
| 1楼： | 自己写函数。 还要判断闰年。 ----------------------------------------------  充电..........
|
|||||
| 作者： |
|
2003/12/6 11:53:40 | ||||
| 2楼： | var ADate : TDateTime; begin ADate := Date; //现假设为当前天 ADate := IncDay(ADate,1); ShowMessage(DateToStr(ADate)); end; ---------------------------------------------- 米软科技有限公司  http://www.szmesoft.com
|
|||||
| 作者： |
|
2003/12/6 14:26:12 | ||||
| 3楼： | 不行呀, 提示说IncDay找不到, 是不是没有这个函数呀?? ---------------------------------------------- *-------------------------------\ | 渴求知识，也渴望您的帮助！ \ | 愿结识当今天下爱好DELPHI之朋友！\ |__________________________________\______^_^ |
|||||
| 作者： |
|
2003/12/6 15:56:46 | ||||
| 4楼： | 其实没那么麻烦，Tdate+1就行了，你想加几天就加几天，100天，1000天，算出的都是准确日期。电脑会自动算闰年之类的。 ---------------------------------------------- - |
|||||
| 作者： |
|
2003/12/6 18:00:07 | ||||
| 5楼： | 要在uses中加入dateutils单元！ ---------------------------------------------- - |
|||||
| 作者： |
|
2003/12/6 18:19:21 | ||||
| 6楼： | 高手就是高手! date+1就行了,我试过了完全OK!! 谢谢hrongp兄, 还有各位回贴的朋友,谢了! ---------------------------------------------- *-------------------------------\ | 渴求知识，也渴望您的帮助！ \ | 愿结识当今天下爱好DELPHI之朋友！\ |__________________________________\______^_^ |
|||||
| 信息 |
| 登陆以后才能回复 |
