Dm.SimpleDataSetCompras.Active:=True;
Dm.SimpleDataSetCompras.Locate('NRCOMPRA',DBEdit1.Text,[loPartialKey]);
Dm.SimpleDataSetCompras.Edit;
Dm.SimpleDataSetComprasDTCOMPRA.Value:=StrToDate(Edit1.Text);
DM.SimpleDataSetComprasCDFORNECEDOR.Value:=StrToInt(Edit1.Text);
DM.SimpleDataSetCompras.Post;
Field 'Data Compra' must have a value
se apago o campo data do componente TsimpleDataSet Dm.SimpleDataSetCompras
o erro vai para Fornecedor
Delphi 7 Dbexpress