关于edit控件显示问题，不是很难

Question

如何限制ＥＤＩＴ控件格式符合日期格式
如
2004-04-12

Answer 1

edit1.Text:=Datetostr(date); 也是一个不错的方法

Answer 2

fromatDateTime('yyyy-mm-dd',now) 我想设置的不是当前日期，是自己可以输入日期或０值的字符串

Answer 3

MaskEdit不大好用
不如直接用DateTimePicker

Answer 4

用DateTimePicker啦，免得操那么多的心。

Answer 5

要不在Edit的OnExit事件里自己写
if Trim(Edit1.Text)='0' then exit;
try
  StrToDate(Trim(Edit1.Text);
except
  Showmessage('Error!');
  Edit1.SetFocus;
  abort;
end;

Answer 6

用fromatDateTime('yyyy-mm-dd',now)就行了

Answer 7

为什么这段代码输入字符时try不能跳过try
  StrToDate(Trim(Edit1.Text));
except
  Showmessage('Error!');
  Edit1.SetFocus;
  abort;
end;