请问：我如何判断所输入的字符串是一个日期？

Question

try
  StrToDate(s);
  Result := True
except
  Result := False
end

Answer 1

var str:tdatetime;
try
 str:=strtodatetime(s)
excetpend;

Answer 2

chechy(chechy)的代码就是判断当前输入的日期是否合法啊，返回true是合法，返回false时不合法，你还要怎么做啊！

Answer 3

由于是新手，在使用chechy的方法时，总是系统报错，我想在输入不成功时，我能够自己报错。比如，我有一个输入框，你输入任意值，我就可以判断你所输入的是不是合法日期，是的话通过，不是的话，我有提示框出项。怎么实现？谢谢！！！！

Answer 4

1、你不再集成环境中运行，则系统不会报错。
2、在集成环境中，选择Debugger Option，在Language Exceptions中点掉Stop On Delphi Exception。系统也不会报错。
如果想显示自己的提示框，可以在Except中写，也可以函数返回False后写。

Answer 5

谢谢chechy的帮助，忠心感谢！希望以后多多得到你的帮助。^_^看加分！