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;




Начало  Назад  Вперед



Книжный магазин