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

ilikenba

uses DateUtils;

/ d3 L, o5 e) D/ S- D

YearsBetween(); //年 MonthsBetween(); //月 DaysBetween(); //日 ; A8 m. R0 Q1 QHoursBetwen(); //时 ! R# H& ~, _9 q/ e, }9 n1 KMinutesBetween();//分 - R# W( I- s, dSecondsBetween();//秒

" D( v/ J' l3 h' U& W. }8 A" L- b

如：

) x0 I4 ^1 w; [3 T6 |

uses DateUtils;

procedure TForm1.Button1Click(Sender: TObject); # J& h6 z2 V2 `$ R3 u* ovar ! f6 u5 H2 u) |. J# ]' z V time1,time2:TDateTime; begin 1 x) D: ?5 M2 @' ^+ X' T time1 := strtodatetime('2004-09-01 20:20:05'); time2 := strtodatetime('2004-09-07 15:27:02'); ( X4 ^7 o' w9 S& N2 w ShowMessage(IntToStr(MinutesBetween(time1, time2))); & y8 z% Z6 K' g1 Lend;

xShandow

Delphi自带的？

maerlin

谢谢

还有好的吗？

用delphi数据库功能怎么样

ilikenba

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

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

惊瞥孤鸿影

红AHJKGSUOGBJDGWQOWJ

xiang1990

建议，下一次发一点作图程序，各种规则图形作图