SecsPerDay：一天共有多少秒

本文整理自网络，侵删。

 声明：const SecsPerDay = 86400;

描述：MinsPerDay常量给出一天中秒的数量（24*60*60＝86400）。

begin
ShowMessage('Number of minutes in a week = '+IntToStr(MinsPerDay*7));
ShowMessage('Number of seconds in a week = '+IntToStr(SecsPerDay*7));
end;

程序运行结果：

Number of minutes in a week = 10080

Number of seconds in a week = 604800
 

相关阅读 >>

Delphi fmx使用 timage 显示动画图片

dbgrid的cellclick事件，单击当前行记录的那一行时，不发生

Delphi 实现文件上传下载

Delphi webbrowser 去除滚动条和边框

Delphi tfilestream和tmemorystream分别读取、创建、合并文件

Delphi读写二进制文件

Delphi 解析 png 图片的十六进制字符流

Delphi 在tmemo中查找文本

orangeui作者开源作品

Delphi中利用msdasc来配置数据库链接

更多相关阅读请进入《Delphi》频道 >>

转载请注明出处：木庄网络博客 » SecsPerDay：一天共有多少秒