怎么获取两个日期的时间差! ( 积分: 20 )

  • 主题发起人 主题发起人 linys99
  • 开始时间 开始时间
L

linys99

Unregistered / Unconfirmed
GUEST, unregistred user!
返回结果要是一个数值。
 
返回结果要是一个数值。
 
在SQL里面用datediff
在delphi里面直接减就行,返回就是一个int型的值。
 
能不能全部写出来,我的日期变量是存在文件里的!
 
我用
edit3.Text:= IntToStr(StrToDateTime(edit2.Text)-StrToDateTime(edit1.Text));
但是老是提示
[Error] Unit1.pas(40): Incompatible types: 'String' and 'Extended'
[Fatal Error] Project2.dpr(5): Could not compile used unit 'Unit1.pas'
 
我的笔记里面有,看看去吧。
http://www.delphibbs.com/keylife/iblog_show.asp?xid=517
 
在SQL里面用datediff,看一下sql的帮助,很清楚的,
两时间相减后要加1
 

edit3.Text:= VarToStr(StrToDateTime(edit2.Text)-StrToDateTime(edit1.Text));
 
提问题之前为何不搜索一下以前的帖子,有很多这种问题了,肯定有你想要的
 
Var
d : Double;

d := Date1 - Date2;
 
delphi 7中有這些函數, 如果不是delphi7, 就ctrl跟縱過去,copy他的方法
DaysBetween()
MonthsBetween()
HoursBetween()
MinutesBetween()
SecondsBetween()
sqlserver
datediff(Datepart, Date1, Date2)
Datepart 可以是 yyyy:年, mm:月, dd;日, hh:小時.......
 
接受答案了!
 
后退
顶部