QQ登录

只需要一步,快速开始

 注册地址  找回密码
查看: 11256|回复: 5
打印 上一主题 下一主题

几个用来计算时间差的函数!

[复制链接]
字体大小: 正常 放大
ilikenba 实名认证       

1万

主题

49

听众

2万

积分

  • TA的每日心情
    奋斗
    2024-6-23 05:14
  • 签到天数: 1043 天

    [LV.10]以坛为家III

    社区QQ达人 新人进步奖 优秀斑竹奖 发帖功臣

    群组万里江山

    群组sas讨论小组

    群组长盛证券理财有限公司

    群组C 语言讨论组

    群组Matlab讨论组

    跳转到指定楼层
    1#
    发表于 2004-10-26 20:11 |只看该作者 |倒序浏览
    |招呼Ta 关注Ta

    uses DateUtils;

    ; P/ o& h+ C" Z) ` s S' K7 a9 }

    YearsBetween(); //年) S1 A1 k" w' Z) | A0 ^3 K MonthsBetween(); //月 * u ?' _/ _1 MDaysBetween(); //日, k: W" \- c9 p2 j2 G HoursBetwen(); //时 , l( W0 r2 |6 z# b3 Z8 y& M% gMinutesBetween();//分 " Y! F% P# P- h! f. o- f8 MSecondsBetween();//秒

    5 @2 K$ S3 I- ` G: e8 z8 `

    如:

    ' h& \, W4 {/ [0 ~ Y; C- P& @

    uses DateUtils;

    ; n( h/ _1 _& D, |! E

    " a j4 k ^9 A" u3 c/ s( R procedure TForm1.Button1Click(Sender: TObject);: G& h, U2 l) C& v8 b0 \9 r: P var , K0 |( u# P- k, m8 ] time1,time2:TDateTime;/ q! ?7 s$ l6 \" g/ n begin - a0 G2 {) h$ n' W# F+ }, o time1 := strtodatetime('2004-09-01 20:20:05'); # h5 O0 S# V: L time2 := strtodatetime('2004-09-07 15:27:02'); / `5 ~" E# n, Y( t7 } ShowMessage(IntToStr(MinutesBetween(time1, time2))); 0 g) W' C ^1 _end;

    zan
    转播转播0 分享淘帖0 分享分享0 收藏收藏0 支持支持0 反对反对0 微信微信
    xShandow        

    43

    主题

    1

    听众

    385

    积分

    升级  28.33%

    该用户从未签到

    国际赛参赛者

    新人进步奖

    回复

    使用道具 举报

    maerlin        

    0

    主题

    0

    听众

    31

    积分

    升级  27.37%

    该用户从未签到

    新人进步奖

    回复

    使用道具 举报

    ilikenba 实名认证       

    1万

    主题

    49

    听众

    2万

    积分

  • TA的每日心情
    奋斗
    2024-6-23 05:14
  • 签到天数: 1043 天

    [LV.10]以坛为家III

    社区QQ达人 新人进步奖 优秀斑竹奖 发帖功臣

    群组万里江山

    群组sas讨论小组

    群组长盛证券理财有限公司

    群组C 语言讨论组

    群组Matlab讨论组

    是Delphi自带的!可以用数据库的函数,例如:DateDiff函数!

    另外在BCB中对于日期时间型的变量可以直接用+或-号处理!因为已经重载了这两个运算符!

    回复

    使用道具 举报

    2

    主题

    4

    听众

    46

    积分

    升级  43.16%

  • TA的每日心情
    开心
    2013-6-3 22:50
  • 签到天数: 1 天

    [LV.1]初来乍到

    自我介绍
    菜鸟
    回复

    使用道具 举报

    xiang1990        

    31

    主题

    4

    听众

    723

    积分

    升级  30.75%

  • TA的每日心情
    奋斗
    2013-5-9 15:51
  • 签到天数: 138 天

    [LV.7]常住居民III

    自我介绍
    我是数学老师
    回复

    使用道具 举报

    您需要登录后才可以回帖 登录 | 注册地址

    qq
    收缩
    • 电话咨询

    • 04714969085
    fastpost

    关于我们| 联系我们| 诚征英才| 对外合作| 产品服务| QQ

    手机版|Archiver| |繁體中文 手机客户端  

    蒙公网安备 15010502000194号

    Powered by Discuz! X2.5   © 2001-2013 数学建模网-数学中国 ( 蒙ICP备14002410号-3 蒙BBS备-0002号 )     论坛法律顾问:王兆丰

    GMT+8, 2026-8-23 20:34 , Processed in 0.463858 second(s), 84 queries .

    回顶部