如何在Delphi中的应用程序中使结束日期大于开始日期验证？

Question

如何使用Delphi确保end date大于我的应用程序中的begin date？

例如，

如果我使用TDBEdit输入我的begin date作为12/01/2000，并在我的结束日期12/01/1999，我怎样才能阻止结束日期在开始日期之前

我需要提出raise.exception.create('your end date is illogical.');？

Answer 1

当用户单击保存按钮时，或者在保存数据之前（您可以使用数据集的BeforePost事件），您可以进行检查，关注startdate并显示消息并引发异常。< / p>

Answer 2

使用StrToDate()将两个字符串转换为TDateTime值，然后您可以使用<等算术运算符将这些值相互比较。