数学建模社区-数学中国

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

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

uses DateUtils;

YearsBetween(); //年 1 C3 }. ]0 p8 x5 z/ E8 dMonthsBetween(); //月 , s4 O. B7 E4 R! D" @DaysBetween(); //日5 n/ _/ u, e! f7 P4 t$ V) O# d HoursBetwen(); //时 3 r" T1 ~) F% u% @% mMinutesBetween();//分 $ F K* y7 ^7 h+ I, b( wSecondsBetween();//秒

如：

uses DateUtils;

0 A; ~. i9 Q+ i$ O# l1 M J' }procedure TForm1.Button1Click(Sender: TObject);& E1 ?& ^) u! l1 x var9 M* n0 w$ J Q/ ` time1,time2:TDateTime; W3 O0 w) [; J% H, Fbegin / \4 l* f/ M3 t1 N$ T time1 := strtodatetime('2004-09-01 20:20:05');$ J. b6 p7 O# ~, p' l' _ time2 := strtodatetime('2004-09-07 15:27:02');, J4 Y5 F S6 y3 l7 v( h. V ShowMessage(IntToStr(MinutesBetween(time1, time2)));2 A2 c$ c. q5 ^% a 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/)