数学建模社区-数学中国

标题: 几个用来计算时间差的函数！ [打印本页]

作者: ilikenba 时间: 2004-10-26 20:11
标题: 几个用来计算时间差的函数！

uses DateUtils;

YearsBetween(); //年% ^3 Y. l* D3 b0 ?# m! n, c9 c MonthsBetween(); //月 - N7 Z. @0 m% Z& a. n; tDaysBetween(); //日. |5 d/ }9 U. i HoursBetwen(); //时 " v* l5 D7 A( a$ h( AMinutesBetween();//分 & i3 {" Y! x+ M ^3 U! N% `SecondsBetween();//秒

如：

uses DateUtils;

& C' W% Z {8 A. n; @& _* W2 sprocedure TForm1.Button1Click(Sender: TObject); + [0 t$ ^6 l2 F% k% G. R" w9 w- Pvar4 L- H$ @4 E0 q- \+ D- o) O time1,time2:TDateTime;3 Q2 k( q0 A m+ N2 k/ y; ~; A begin5 D4 g' r3 k- x; |6 L7 J. | time1 := strtodatetime('2004-09-01 20:20:05'); ( J, S$ V4 d# m. w5 g9 P time2 := strtodatetime('2004-09-07 15:27:02');8 W& Y( F+ g( B4 y' j4 e. ? ShowMessage(IntToStr(MinutesBetween(time1, time2)));: Q, a; \) n- a. J: q end;

作者: xShandow 时间: 2004-10-27 13:42

Delphi自带的？

作者: maerlin 时间: 2004-10-27 14:42

谢谢

还有好的吗？

用delphi数据库功能怎么样

作者: ilikenba 时间: 2004-10-27 18:27

是Delphi自带的！可以用数据库的函数，例如：DateDiff函数！

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

作者: 惊瞥孤鸿影 时间: 2012-6-22 16:39
红AHJKGSUOGBJDGWQOWJ

作者: xiang1990 时间: 2012-6-30 15:32
建议，下一次发一点作图程序，各种规则图形作图

欢迎光临数学建模社区-数学中国 (http://www.madio.net/)