如何使用Delphi中的OnValidate和OnBeforePost结合实现数据验证?