DBEdit9能自动计算假期时间

Question

我用了两个tdatetimepicker(用于时间起和至的输入) 和一个dbedit
我想在td_startday(一个tdatetimepicker)输入后，转移到DBEdit9时
，DBEdit9能自动计算假期时间，请教。下面这个不行，DBEdit9(字段是int)得到的是xxxx-xx-xx
procedure TForm_add.DBEdit9Enter(Sender: TObject);
begin
   dbedit9.text:=datetostr(td_endday.date-td_startday.date);
end;
如何办呢？

Answer 1

dbedit9.Field.Value:=datetoint(td_endday.date-td_startday.date);

Answer 2

在adotable或adoquery的
onchange事件中

Answer 3

uses DateUtilsprocedure TForm_add.DBEdit9Enter(Sender: TObject);
begin
   dbedit9.text:=inttostr(DaysBetween(td_endday.date,td_startday.date))
end;