Delphi 3 и создание приложений баз данных




33.6.2. Использование параметра UpdateKind


Параметр UpdateKind позволяет в случае ошибки предпринять какие-либо действия, зависящие от способа изменения записи.

Пример.

Если произошла ошибка при попытке подтверждения кэшированного удаления записи, нужно восстановить запись:

procedure TForm1.TovaryUpdateError(DataSet: TDataSet;

E: EDatabaseError; UpdateKind: TUpdateKind;

var UpdateAction: TUpdateAction);

begin

IF UpdateKind = ukDelete THEN Tovary.RevertRecord;

end;




Содержание  Назад  Вперед