精华区 [关闭][返回]

当前位置:网易精华区>>讨论区精华>>编程开发>>● Delphi>>时间和日期>>**07-10-2000 20:21:54 07-10-2000 20:30

主题:**07-10-2000 20:21:54 07-10-2000 20:30
发信人: x_file()
整理人: (2000-12-07 21:41:19), 站内信件
【 在 gzsoftware (gzsoftware) 的大作中提到: 】
: 07-10-2000 20:21:54   07-10-2000 20:30:36  时间相减如何得到秒数?

: 如:07-10-2000 20:21:54
:     07-10-2000 20:30:36
:    .......

相减的结果
试一试以下代码:

procedure TForm1.Button1Click(Sender: TObject);
var
  dtr,dts,dte : TDateTime;
  min : double;
begin
  dts :=strtodatetime('2000-11-9 12:30');
  dte :=strtodatetime('2000-11-9 11:30');
  dtr :=dte-dts;
  min :=dtr*24*60*60;
  showmessage(floattostr(min))
end;

--
别人笑我太疯癫,我笑他人看不穿
不见五陵豪杰墓,无花无酒锄作田

※ 来源:.月光软件站 http://www.moon-soft.com.[FROM: 61.142.250.35]

[关闭][返回]