方法：

uses DateUtils;

 SecondsBetween(Now(),StrToDateTime(Edit1.Text));

时间调用：   
  AnsiString   sTime;   
  sTime   =   Now.Format("yyyy-mm-dd   hh:nn:ss");   
 
  时间差：   

 SecondsBetween(DateTime1,DateTime2);    
  返回时间：   
  AnsiString   sTime   =   "2006-3-31   23:12:12";   
  TDateTime   dTime;   
  dTime   =   StrToDateTime(sTime);