IncSecond:将一个TDateTime变量加减一定数量的秒数
2024-10-07 09:09:18
http://tieba.baidu.com/p/1998083296
IncSecond:将一个TDateTime变量加减一定数量的秒数
声明:function IncSecond ( const StartDateTime : TDateTime {; NumberOfSeconds : Integer = 1} ) : TDateTime;
描述:IncSecond函数将传递进来的StartDateTime参数加上NumberOfSeconds数量的秒数。
年份、月份、日期和小时数,会相应的增减。
增减的数量是可选的,默认为1。
备注:没有DeSecond函数,而是在IncSecond函数使用一个负数增加量。
var
myDate : TDateTime;
begin
// 初始化变量
myDate := EncodeDateTime(2005, 12, 31, 23, 59, 0, 0);
ShowMessage('myDate = '+DateTimeToStr(myDate));
// 加上60秒
myDate := IncSecond(myDate, 60);
ShowMessage('myDate + 60 seconds = '+DateTimeToStr(myDate));
// 减去120秒
myDate := IncSecond(myDate, -120);
ShowMessage('myDate - 120 seconds = '+DateTimeToStr(myDate));
end;
程序运行结果:
myDate = 2005-12-31 23:59:00
myDate + 60 seconds = 2006-1-1
myDate - 120 seconds = 2005-12-31 23:58:00
最新文章
- Can't use Subversion command line client: svn Probably the path to Subversion executable is wrong. Fix it.
- 提交留言HTML模板代码
- 11月8日PHP练习《留言板》
- Eclipse JAVA文件注释乱码
- linux系统数据落盘之细节
- NOIp 2013 #2 花匠 Label:爆0的Water
- Python3基础 sort 将一个列表中的值升序排列
- python 写文件,utf-8问题
- DevExpress DXperience 的ASPxFilterControl 不显示 Like 菜单的方法
- POJ 1274
- Linux PAM&;&;PAM后门
- http cookie
- c语言: 文件io, 拷贝文件(二进制)
- html 设置页脚div一直在页面底部
- 使用OpenCV训练Haar like+Adaboost分类器的常见问题
- 使用Crowd集成Confluence与JIRA
- Ubuntu18.04终端设置为zsh后的问题记录
- mysql主从复制总结
- spring boot js 文件引用 单引问题。
- netstat/lsof