高分求解TDateTimePicker的问题

//问题是这样的使用DateTimePicker在onChange事件中如果写一个showmessage
//当change时就会弹出showmessage，当点过第一个后不点第二个或点的慢了，
//DateTimePicker就自己跑起来了
//一直到崩溃。产生的条件是DateTimePicker的DateMode:=dmComboBox;
//而且我发现当使用DateMode:=dmComboBox;从下拉的日历控件显示到改完日期，系统一
//共调用了2次onchange,虽然日期只改变了1次，如果手动填上日期则只发生一次
//onchange.
//谁能告诉我这是怎么回事啊？
procedure TForm1.DateTimePicker1Change(Sender: TObject);
begin
showmessage('sadfsa');
end;