我想计算两次之间的小时差异。我应该使用哪些组件:DateTimepickers或ComboBoxes

时间:2016-05-02 14:17:43

标签: delphi

var
  Hour, Min, Sec, MSec: Word;
begin
  DecodeTime(ComboBox1-ComboBox2, Hour, Min, Sec, MSec);
end;

这是代码,但它一直出错?

1 个答案:

答案 0 :(得分:8)

DecodeTime需要一个TDateTime变量。 ComboBox1ComboBox2是组件。使用TDateTimePicker及其DateTime属性。 (如果更适合,可能是Time属性。)

要计算两次之间的小时数,请使用DateUtils.HoursBetween代替DecodeTime

hourDiff := HoursBetween(DateTimePicker1.DateTime,DateTimePicker2.DateTime);