德尔菲的时间比较问题

这个很简单！

假设 data1 和 data2 是两个 datetimepicker，edit 是名称。btn 是存储数据库按钮...。db 是一个数据库。

首先，在 data1 的 onchange 事件中定义它。

beginif > then

;showmessage('进厂时间不能大于出厂时间！ ');

end;然后在 data2 onchange 中。

beginif < then

;showmssage('出厂时间不能少于出厂时间');

end;事件。

beginif < then

beginshowmessagae('时间选择错误，请重新选择-......!');

exitelse

end;end;

d1 分解 decodedate， （d1，yy，nn，rr） = encodedate（yy，nn +1，rr），然后合并多年减法是无限的，所以可以直接加减法。

d1： = d1-1，然后直接从日期中减去 1。

如果要从一个月中加减，我们必须首先确定下个月年变化中的天数之间的关系。 它应该是第一位的。

d1 = d1 +（encodedate（nn，yy +1，rr），encodedate（yy，nn，rr））;

在一个月的天数中，第一次抽奖是非常必要的。 再次减去。

d1：d1（encodedate（yy，nn，rr）encodedate（nn，yy-1，rr））;

请不要在官方程序文件中使用 dbgird，至少这个只能用于读而不能写，并且数据库必须使用分层结构来编写。

首先，这取决于您的数据库是什么数据，以及输入时间字段和出厂时间字段的格式是否正确。

只需直接比较日期时间即可。

if > then

beginshowmessage('出发日期不正确')endelse

end;