Wagner,
Using TADS with livebinding FMX.
There are some circunstances that I need to cancel the update of TAureliusDataset.
This is what I have in the NewObjectUpdate event:
procedure TNaharDataSet.NewObjectUpdate(Dataset: TDataSet; AObject: TObject);
begin
if not IsEqualGUID((AObject as TNaharEntity).OwnedBy, NULL_GUID) then
begin
DataSet.Cancel;
DataSet.Refresh;
raise Exception.Create('Voçe não é o dono destas informações')
end
else
begin
Model.SaveOrUpdate(AObject as TNaharEntity);
Model.Flush;
end;
end;
I have found that calling that DataSet.Cancel make the Dataset get out of the state of editing.
But the value entered remain in the editor. I have tried the Refresh but it does not change. Changing the record and getting back again either. Seems that the value got updated on the internal object of TAD besides canceled.
What can I do at this point to revert editing?
Eduardo