请问计算两时间之差用什么函数？

Question

超菜问题，可惜就是找不到！
请帮忙随便回答一下，谢谢~~~~

Answer 1

谢谢两位！
我刚刚学Delphi，刚才是因为数据类型的问题而出错，看看我这样的代码合适吗？procedure TForm1.Button1Click(Sender: TObject);
var
  num:Double;
  ADate,BDate:TDateTime;
begin
  DateSeparator := '-';
  ShortDateFormat := 'm/d/yyyy';
  Label1.Caption := DateToStr(Date);
  ADate:=StrToDate(Edit2.Text+'-'+Edit3.Text+'-'+Edit1.Text);
  BDate:=StrToDate(Edit5.Text+'-'+Edit6.Text+'-'+Edit4.Text);
  num:=BDate-ADate;
  Edit7.Text:=FloatToStr(num);
end;