procedure TForm1.Table1BeforePost(DataSet: TDataSet); begin if DBEdit1.Text = '' then //判断编辑框中的姓名是否为空,如果是调用Abort方法 Abort; End;
修改数据且在提交给数据库前验证
最新推荐文章于 2022-03-22 06:06:33 发布
procedure TForm1.Table1BeforePost(DataSet: TDataSet); begin if DBEdit1.Text = '' then //判断编辑框中的姓名是否为空,如果是调用Abort方法 Abort; End;