时间格式问题（很恐怖的错误），请朋友们指点一下迷津

我在clientdataset的日期字段editmask设置的格式如下： !9999/99/00 99:99;1;_然后在clientdateset的onsettext事件中写如下提示说明：
procedure Tfrm_tdrsq.clientdatasetTDQSSJSetText(Sender: TField;
  const Text: String);
begin
  try
    strtodatetime(text);
  except
    showmessage('日期输入错误，请重新输入');
  end
end;
然后我用的dbedit链的日期字段，在用户录入错误的时候，能解决一些问题。
但是遇到用户要修改日期，录入错误日期的时候，会报错invalid input value.
use escape key to abandon changes 
因为我的程序是浏览器版，于是浏览器就无法关闭！必须在任务管理器下面关闭。
想自己写个时间控件，但是时间太仓促，必须立即解决，所以请遇到类似问题的朋友帮忙一二，感激不尽。