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 检查屏幕是否处于锁屏或关闭状态

Delphi 10.3.1 android沉浸式透明状态栏

Delphi 加密解密字符串函数

Delphi 将程序加裁到启动项

Delphi 自带单元字符md5加密

Delphi winapi: getactivewindow - 获取当前活动窗口的句柄

Delphi 用正则表达式检查一个串是否是电信的手机号

Delphi多级指针

Delphi tdragimage v0.1 Delphi 图片拖拽组件 带有加速度 碰撞效果

Delphi 比较图片是否相同

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

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