{
This example checks for a valid entry in a TDBEdit control and calls the Abort procedure if the control is empty; Abort cancels the post before it happens.
} 
procedure TForm1.MyDataBeforePost(DataSet: TDataSet);
begin
if DBEdit1.Text = '' then
  Abort;
end; 
