请教问题

Question

我有datetimepicker1和datetimepicker2，如何防止datetimepicker2的日期比datetimepicker1的小？我在datetimepicker2的onchange事件中的代码：
if datetimepicker2.date<datetimepicker1.date then
  showmessae('no')
结果用键盘直接输入就没有问题，但如果用鼠标选择日期就会出现两次的message，不知为什么？
还有就是我想在检出错误后把datetimepicker2的日期设回当日的日期，不知怎样做。

Answer 1

在onexit中写有点不妥，不能及时查出错误，而且必须离开datetimepicker2才进行判断，不好；还有其它方法吗？

Answer 2

if datetimepicker2.date<datetimepicker1.date then
  datatimepicker2.date:=now;

Answer 3

1、改写在OnExit事件中
2、datatimepicker2.date:=now;

Answer 4

因为onchange修改一点就执行，所以你会出现两次以上Showmessage()。用OnExit吧！