计算时间我们会有误差?delphi
为什么会有这样的情况?
代码
procedure TForm1.Button1Click(Sender: TObject);
var
d1,d2:tdatetime;
minutes,days,hours:integer;
begin
d1 := strtodatetime(edit1.Text);
d2 := strtodatetime(edit2.Text);
minutes := minutesbetween(d1, d2);
hours := hoursbetween(d1, d2);
days := daysbetween(d1, d2);
edit3.Text := inttostr(days);
edit4.Text := inttostr(hours);
edit5.Text := inttostr(minutes);
end;